]>
Commit | Line | Data |
---|---|---|
acf3b940 | 1 | #!/usr/bin/gawk -f |
16397458 | 2 | # |
a30e665b | 3 | # This is adapter v0.28. Adapter adapts .spec files for PLD Linux. |
0ba21b70 | 4 | # $Id$ |
73e1a9a3 | 5 | # |
0ba21b70 | 6 | # Copyright (C) 1999-2006 PLD-Team <feedback@pld-linux.org> |
73e1a9a3 | 7 | # Authors: |
d3da6a6e | 8 | # Michał Kuratczyk <kura@pld.org.pl> |
b741d74d | 9 | # Sebastian Zagrodzki <s.zagrodzki@mimuw.edu.pl> |
d3da6a6e | 10 | # Tomasz Kłoczko <kloczek@rudy.mif.pg.gda.pl> |
fb9ab58f | 11 | # Artur Frysiak <wiget@pld-linux.org> |
2873c9d1 | 12 | # Michal Kochanowicz <mkochano@pld.org.pl> |
d3da6a6e | 13 | # Elan Ruusamäe <glen@pld-linux.org> |
d5f65bb3 ER |
14 | # |
15 | # See cvs log adapter{,.awk} for list of contributors | |
16 | # | |
73e1a9a3 | 17 | # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # |
3b100864 | 18 | |
3f6918f6 ER |
19 | # TODO |
20 | # - parse ../PLD-doc/BuildRequires.txt and setup proper BR epoches? | |
21 | # - add "-nc" option to skip CVS interaction | |
a3ca2c50 ER |
22 | # - sort Summary(XX) |
23 | # - sort Requires, BuildRequires | |
2e214691 | 24 | # - check if %description (lang=C) contains 8bit |
a3ad3d2b | 25 | # - desc wrapping is totally fucked up on global.spec,1.25, dosemu.spec,1.115- |
3f6918f6 | 26 | |
16397458 | 27 | BEGIN { |
b7ab5ec4 | 28 | RPM_SECTIONS = "package|build|changelog|clean|description|install|post|posttrans|postun|pre|prep|pretrans|preun|triggerin|triggerpostun|triggerun|verifyscript|check" |
41c24376 | 29 | SECTIONS = "^%(" RPM_SECTIONS ")" |
37403736 | 30 | |
262e7be2 | 31 | PREAMBLE_TAGS = "(Summary|Name|Version|Release|Epoch|License|Group|URL|BuildArch|BuildRoot|Obsoletes|Conflicts|Provides|ExclusiveArch|ExcludeArch|Pre[Rr]eq|(Build)?Requires)" |
7c43f31c | 32 | |
a3c6bbce | 33 | preamble = 1 # Is it part of preamble? Default - yes |
a3ad3d2b ER |
34 | boc = 4 # Beginning of %changelog |
35 | bod = 0 # Beginning of %description | |
2b4c59bc | 36 | tw = 70 # Descriptions width |
d2bcf054 | 37 | |
a5e4249b | 38 | b_idx = 0 # index of BR/R arrays |
42cd9911 | 39 | BR_count = 0 # number of additional BuildRequires |
a5e4249b | 40 | |
2f46ef70 | 41 | # If variable removed, then 1 (for removing it from export) |
42 | removed["LDFLAGS"] = 0 | |
43 | removed["CFLAGS"] = 0 | |
44 | removed["CXXFLAGS"] = 0 | |
308c7423 | 45 | |
e0ab434c ER |
46 | # get cvsaddress for changelog section |
47 | # using rpm macros as too lazy to add ~/.adapterrc parsing support. | |
48 | "rpm --eval '%{?_cvsmaildomain}%{!?_cvsmaildomain:@pld-linux.org}'" | getline _cvsmaildomain | |
bdd8892f | 49 | "rpm --eval '%{?_cvsmailfeedback}%{!?_cvsmailfeedback:PLD Team <feedback@pld-linux.org>}'" | getline _cvsmailfeedback |
e0ab434c | 50 | |
337741dd | 51 | # If 1, we are inside of comment block (started with /^#%/) |
52 | comment_block = 0 | |
d2bcf054 | 53 | |
1a29fcfa | 54 | # File with rpm groups |
a41708aa SZ |
55 | "rpm --eval %_sourcedir" | getline groups_file |
56 | groups_file = groups_file "/rpm.groups" | |
03fbe002 | 57 | system("cd `rpm --eval %_sourcedir`; [ -f rpm.groups ] || cvs up rpm.groups >/dev/null") |
7df3947d | 58 | system("[ -d ../PLD-doc ] && cd ../PLD-doc && ([ -f BuildRequires.txt ] || cvs up BuildRequires.txt >/dev/null)"); |
6b02d821 | 59 | |
308c7423 | 60 | # Temporary file for changelog section |
61 | changelog_file = ENVIRON["HOME"] "/tmp/adapter.changelog" | |
62 | ||
6b02d821 | 63 | # Load rpm macros |
a9f3f77c | 64 | "rpm --eval %_prefix" | getline prefix |
65 | "rpm --eval %_bindir" | getline bindir | |
66 | "rpm --eval %_sbindir" | getline sbindir | |
67 | "rpm --eval %_libdir" | getline libdir | |
68 | "rpm --eval %_sysconfdir" | getline sysconfdir | |
69 | "rpm --eval %_datadir" | getline datadir | |
70 | "rpm --eval %_includedir" | getline includedir | |
71 | "rpm --eval %_mandir" | getline mandir | |
72 | "rpm --eval %_infodir" | getline infodir | |
33957389 | 73 | "rpm --eval %_examplesdir" | getline examplesdir |
99b02f64 | 74 | "rpm --eval %_defaultdocdir" | getline docdir |
e5c731ae | 75 | "rpm --eval %_kdedocdir" | getline kdedocdir |
9086b883 ER |
76 | "rpm --eval %_desktopdir" | getline desktopdir |
77 | "rpm --eval %_pixmapsdir" | getline pixmapsdir | |
c9cb5723 ER |
78 | |
79 | "rpm --eval %perl_sitearch" | getline perl_sitearch | |
80 | "rpm --eval %perl_archlib" | getline perl_archlib | |
81 | "rpm --eval %perl_privlib" | getline perl_privlib | |
c9cb5723 ER |
82 | "rpm --eval %perl_vendorlib" | getline perl_vendorlib |
83 | "rpm --eval %perl_vendorarch" | getline perl_vendorarch | |
84 | "rpm --eval %perl_sitelib" | getline perl_sitelib | |
f9ae8d4e | 85 | |
e85cf573 ER |
86 | "rpm --eval %py_sitescriptdir 2>/dev/null" | getline py_sitescriptdir |
87 | "rpm --eval %py_sitedir 2>/dev/null" | getline py_sitedir | |
88 | "rpm --eval %py_scriptdir 2>/dev/null" | getline py_scriptdir | |
9f2514dd ER |
89 | |
90 | "rpm --eval %ruby_archdir" | getline ruby_archdir | |
91 | "rpm --eval %ruby_ridir" | getline ruby_ridir | |
92 | "rpm --eval %ruby_rubylibdir" | getline ruby_rubylibdir | |
93 | "rpm --eval %ruby_sitearchdir" | getline ruby_sitearchdir | |
94 | "rpm --eval %ruby_sitelibdir" | getline ruby_sitelibdir | |
95 | ||
f175a699 | 96 | "rpm --eval %php_pear_dir" | getline php_pear_dir |
ab73bfb4 | 97 | "rpm --eval %tmpdir" | getline tmpdir |
16397458 | 98 | } |
99 | ||
100 | # There should be a comment with CVS keywords on the first line of file. | |
be7dead6 | 101 | FNR == 1 { |
6b02d821 | 102 | if (!/# \$Revision:/) # If this line is already OK? |
103 | print "# $" "Revision:$, " "$" "Date:$" # No | |
95255dcd | 104 | else { |
6b02d821 | 105 | print $0 # Yes |
106 | next # It is enough for first line | |
95255dcd | 107 | } |
16397458 | 108 | } |
109 | ||
a9f3f77c | 110 | # If the latest line matched /%files/ |
111 | defattr == 1 { | |
ff9e2987 ER |
112 | if (ENVIRON["SKIP_DEFATTR"] != 1) { |
113 | if ($0 !~ /defattr/) { # If no %defattr | |
114 | print "%defattr(644,root,root,755)" # Add it | |
115 | } else { | |
116 | $0 = "%defattr(644,root,root,755)" # Correct mistakes (if any) | |
117 | } | |
118 | } | |
32bb73d8 | 119 | defattr = 0 |
a9f3f77c | 120 | } |
121 | ||
a5e4249b ER |
122 | function b_makekey(a, b, s) { |
123 | s = a "" b; | |
124 | # kill bcond | |
42cd9911 | 125 | gsub(/[#%]+{[!?]+[_a-zA-Z0-9]+:/, "", s); |
f24835a8 | 126 | |
f51e180c | 127 | # kill commented out items |
42cd9911 | 128 | gsub(/^#[ \t]*/, "", s); |
f24835a8 | 129 | |
7c43f31c | 130 | # force order |
42cd9911 ER |
131 | gsub(/^Summary\(/, "11Summary(", s); |
132 | gsub(/^Summary/, "10Summary", s); | |
133 | gsub(/^Name/, "2Name", s); | |
134 | gsub(/^Version/, "3Version", s); | |
135 | gsub(/^Release/, "4Release", s); | |
136 | gsub(/^Epoch/, "5Epoch", s); | |
137 | gsub(/^License/, "5License", s); | |
138 | gsub(/^Group/, "6Group", s); | |
139 | gsub(/^URL/, "7URL", s); | |
140 | ||
141 | gsub(/^BuildRequires/, "B1BuildRequires", s); | |
142 | gsub(/^BuildConflicts/, "B2BuildConflicts", s); | |
143 | gsub(/^Provides/, "X1Provides", s); | |
144 | gsub(/^Obsoletes/, "X2Obsoletes", s); | |
145 | gsub(/^Conflicts/, "X3Conflicts", s); | |
146 | gsub(/^BuildArch/, "X4BuildArch", s); | |
147 | gsub(/^ExclusiveArch/, "X6ExclusiveArch", s); | |
148 | gsub(/^ExcludeArch/, "X7ExcludeArch", s); | |
149 | gsub(/^BuildRoot/, "X9BuildRoot", s); | |
c0bcd06f ER |
150 | |
151 | # printf("%s -> %s\n", a""b, s); | |
a5e4249b ER |
152 | return s; |
153 | } | |
154 | ||
0bbcf6b4 | 155 | # Comments |
2f97d8ea | 156 | /^#/ && (description == 0) { |
0bbcf6b4 | 157 | if (/This file does not like to be adapterized!/) { |
158 | print # print this message | |
159 | while (getline) # print the rest of spec as it is | |
160 | ||
161 | do_not_touch_anything = 1 # do not touch anything in END() | |
162 | exit 0 | |
163 | } | |
337741dd | 164 | |
0bbcf6b4 | 165 | # Generally, comments are printed without touching |
62565bd5 | 166 | sub(/[ \t]+$/, "") |
003a22bc ER |
167 | |
168 | if (/Source.*md5/) { | |
169 | print $0 | |
170 | next | |
171 | } | |
337741dd | 172 | } |
173 | ||
d71e64d1 | 174 | /^%define/ { |
37403736 | 175 | # Remove defining _applnkdir (this macro has been included in rpm-3.0.4) |
17bd16f3 | 176 | if ($2 == "_applnkdir") { |
6e01f9db | 177 | next |
17bd16f3 ER |
178 | } |
179 | if ($2 == "date") { | |
6e01f9db | 180 | date = 1 |
6cfaf341 ER |
181 | if (did_files == 0) { |
182 | print "%files" | |
183 | print "" | |
184 | did_files = 1 | |
185 | } | |
17bd16f3 ER |
186 | } |
187 | ||
188 | # Do not add %define of _prefix if it already is. | |
189 | if ($2 ~ /^_prefix/) { | |
190 | sub("^"prefix, $3, bindir) | |
191 | sub("^"prefix, $3, sbindir) | |
192 | sub("^"prefix, $3, libdir) | |
193 | sub("^"prefix, $3, datadir) | |
194 | sub("^"prefix, $3, includedir) | |
195 | prefix = $3 | |
196 | } | |
197 | ||
198 | if ($2 ~ /_bindir/ && !/_sbindir/) | |
199 | bindir = $3 | |
200 | if ($2 ~ /_sbindir/) | |
201 | sbindir = $3 | |
5dc7f4ee ER |
202 | if ($2 ~ /_libdir/) { |
203 | if ($3 ~ /^%\(/) { | |
204 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
205 | libdir = "%%%%%%%%%%%%%%" | |
206 | } else { | |
207 | libdir = $3 | |
208 | } | |
209 | } | |
37403736 ER |
210 | if ($2 ~ /_sysconfdir/) { |
211 | if ($3 ~ /^%\(/) { | |
212 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
213 | sysconfdir = "%%%%%%%%%%%%%%" | |
214 | } else { | |
215 | sysconfdir = $3 | |
216 | } | |
217 | } | |
5dc7f4ee ER |
218 | if ($2 ~ /_datadir/) { |
219 | if ($3 ~ /^%\(/) { | |
220 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
221 | datadir = "%%%%%%%%%%%%%%" | |
222 | } else { | |
223 | datadir = $3 | |
224 | } | |
225 | } | |
17bd16f3 ER |
226 | if ($2 ~ /_includedir/) |
227 | includedir = $3 | |
228 | if ($2 ~ /_mandir/) | |
229 | mandir = $3 | |
230 | if ($2 ~ /_infodir/) | |
231 | infodir = $3 | |
99b02f64 ER |
232 | if ($2 ~ /_docdir/) |
233 | docdir = $3 | |
17bd16f3 ER |
234 | |
235 | # version related macros | |
236 | if ($2 ~ /^_beta$/) | |
237 | _beta = $3 | |
238 | if ($2 ~ /^_rc$/) | |
239 | _rc = $3 | |
f8281d0c ER |
240 | if ($2 ~ /^_pre$/) |
241 | _pre = $3 | |
17bd16f3 ER |
242 | if ($2 ~ /^_snap$/) |
243 | _snap = $3 | |
244 | ||
245 | # these are used usually when adapterizing external spec | |
246 | if ($2 ~ /^name$/) | |
247 | name = $3 | |
248 | if ($2 ~ /^version$/) | |
249 | version = $3 | |
250 | if ($2 ~ /^release$/) | |
251 | release = $3 | |
5fd6c8d4 | 252 | |
0311af17 ER |
253 | if ($2 ~ /^mod_name$/) |
254 | mod_name = $3 | |
255 | ||
f0c5c231 | 256 | sub(/[ \t]+$/, ""); |
5fd6c8d4 ER |
257 | # do nothing further, otherwise adapter thinks we're at preamble |
258 | ||
259 | next | |
d71e64d1 SZ |
260 | } |
261 | ||
a3ca2c50 ER |
262 | # Obsolete |
263 | /^%include.*\/usr\/lib\/rpm\/macros\.python$/ { | |
264 | next | |
265 | } | |
266 | ||
337741dd | 267 | ################ |
268 | # %description # | |
269 | ################ | |
37403736 | 270 | /^%description/, (!/^%description/ && $0 ~ SECTIONS) { |
32bb73d8 | 271 | preamble = 0 |
948cad9c | 272 | |
3b100864 | 273 | if (/^%description/) { |
32bb73d8 | 274 | bod++ |
73e1a9a3 | 275 | format_line = "" |
276 | format_indent = -1 | |
3b100864 SZ |
277 | } |
278 | ||
73e1a9a3 | 279 | # Format description |
db167e61 | 280 | if (ENVIRON["SKIP_DESC"] != 1 && description == 1 && !/^%[a-z]+/ && !/^%description/) { |
3b100864 | 281 | if (/^[ \t]*$/) { |
73e1a9a3 | 282 | format_flush(format_line, format_indent) |
3b100864 | 283 | print "" |
73e1a9a3 | 284 | format_line = "" |
285 | format_indent = -1 | |
3b100864 | 286 | } else if (/^[ \t]*[-\*][ \t]*/) { |
73e1a9a3 | 287 | format_flush(format_line, format_indent) |
d2bcf054 | 288 | match($0, /^[ \t]*/) |
73e1a9a3 | 289 | format_indent = RLENGTH |
290 | match($0, /^[ \t]*[-\*][ \t]/) | |
291 | format_line = substr($0, RLENGTH) | |
d2bcf054 | 292 | } else |
73e1a9a3 | 293 | format_line = format_line " " $0 |
32bb73d8 | 294 | next |
948cad9c | 295 | } |
d2bcf054 | 296 | |
d71e64d1 | 297 | if (/^%[a-z]+/ && (!/^%description/ || bod == 2)) { |
4bd1116d | 298 | if (NF > 3 && $2 == "-l") { |
299 | ll = $1 | |
300 | for (i = 4; i <= NF; i++) | |
301 | ll = ll " " $i | |
302 | $0 = ll " -l " $3 | |
303 | } | |
73e1a9a3 | 304 | format_flush(format_line, format_indent) |
948cad9c | 305 | if (bod == 2) { |
32bb73d8 SZ |
306 | bod = 1 |
307 | description = 1 | |
948cad9c | 308 | } else { |
32bb73d8 SZ |
309 | bod = 0 |
310 | description = 0 | |
948cad9c | 311 | } |
312 | } else | |
32bb73d8 | 313 | description = 1 |
16397458 | 314 | } |
315 | ||
337741dd | 316 | ######### |
317 | # %prep # | |
318 | ######### | |
37403736 | 319 | /^%prep/, (!/^%prep/ && $0 ~ SECTIONS) { |
32bb73d8 | 320 | preamble = 0 |
6cfaf341 | 321 | did_prep = 1 |
d2bcf054 | 322 | |
e62422da ER |
323 | use_macros() |
324 | ||
a9f3f77c | 325 | # Add '-q' to %setup |
ef56a1ca | 326 | if (/^%setup/ && !/-q/) { |
d71e64d1 | 327 | sub(/^%setup/, "%setup -q") |
ef56a1ca ER |
328 | } |
329 | ||
671ba17b | 330 | if (/^%setup/ && name != "setup") { |
928c2651 ER |
331 | $0 = fixedsub(name, "%{name}", $0); |
332 | $0 = fixedsub(version, "%{version}", $0); | |
3e20c912 | 333 | if (_beta) { |
928c2651 | 334 | $0 = fixedsub(_beta, "%{_beta}", $0); |
3e20c912 ER |
335 | } |
336 | if (_rc) { | |
928c2651 | 337 | $0 = fixedsub(_rc, "%{_rc}", $0); |
3e20c912 | 338 | } |
f8281d0c ER |
339 | if (_pre) { |
340 | $0 = fixedsub(_pre, "%{_pre}", $0); | |
341 | } | |
3e20c912 | 342 | if (_snap) { |
928c2651 | 343 | $0 = fixedsub(_snap, "%{_snap}", $0); |
3e20c912 | 344 | } |
d769e78f ER |
345 | } |
346 | ||
6f7b0e46 | 347 | if (/^%setup/ && /-n %{name}-%{version}( |$)/) { |
928c2651 | 348 | $0 = fixedsub(" -n %{name}-%{version}", "", $0) |
ef56a1ca | 349 | } |
42cd9911 | 350 | sub("^%patch ", "%patch0 "); |
e62422da ER |
351 | |
352 | # invalid in %prep | |
353 | sub("^rm -rf \$RPM_BUILD_ROOT.*", ""); | |
16397458 | 354 | } |
355 | ||
337741dd | 356 | ########## |
357 | # %build # | |
358 | ########## | |
37403736 | 359 | /^%build/, (!/^%build/ && $0 ~ SECTIONS) { |
32bb73d8 | 360 | preamble = 0 |
16397458 | 361 | |
6cfaf341 ER |
362 | if (did_prep == 0) { |
363 | print "%prep" | |
364 | print "" | |
365 | did_prep = 1 | |
366 | } | |
367 | ||
32bb73d8 | 368 | use_macros() |
035bfa01 | 369 | use_tabs() |
d2bcf054 | 370 | |
68694f00 | 371 | if (/^automake$/) |
372 | sub(/$/, " -a -c") | |
373 | ||
0972e97d | 374 | if (/LDFLAGS/) { |
2f46ef70 | 375 | if (/LDFLAGS="-s"/) { |
376 | removed["LDFLAGS"] = 1 | |
377 | next | |
378 | } else { | |
379 | split($0, tmp, "LDFLAGS=") | |
0972e97d | 380 | count = split(tmp[2], flags, "\"") |
2f46ef70 | 381 | if (flags[1] != "" && flags[1] !~ "!?debug") { |
fe9a6f09 | 382 | sub(/-s[" ]?/, "%{rpmldflags} ", flags[1]) |
2f46ef70 | 383 | $0 = tmp[1] line[1] "LDFLAGS=" flags[1] "\"" |
384 | for (i = 2; i < count; i++) | |
385 | $0 = $0 flags[i] "\"" | |
386 | } | |
0972e97d | 387 | } |
388 | } | |
389 | ||
390 | if (/CFLAGS=/) | |
391 | if (cflags("CFLAGS") == 0) | |
392 | next | |
393 | ||
394 | if (/CXXFLAGS=/) | |
395 | if (cflags("CXXFLAGS") == 0) | |
396 | next | |
d2bcf054 | 397 | |
2f46ef70 | 398 | if (/^export /) { |
399 | if (removed["LDFLAGS"]) | |
400 | sub(" LDFLAGS", "") | |
401 | if (removed["CFLAGS"]) | |
402 | sub(" CFLAGS", "") | |
403 | if (removed["CXXFLAGS"]) | |
404 | sub(" CXXFLAGS", "") | |
405 | # Is there still something? | |
406 | if (/^export[ ]*$/) | |
407 | next | |
408 | } | |
02c61abb | 409 | |
b5f420e4 | 410 | # quote CC |
02c61abb ER |
411 | if (/CC=%{__cc} /) { |
412 | sub("CC=%{__cc}", "CC=\"%{__cc}\"") | |
413 | } | |
d92d1e4f | 414 | |
6702f869 | 415 | # use PLD Linux macros |
d92d1e4f ER |
416 | $0 = fixedsub("glib-gettextize --copy --force","%{__glib_gettextize}", $0); |
417 | $0 = fixedsub("intltoolize --copy --force", "%{__intltoolize}", $0); | |
b5f420e4 | 418 | $0 = fixedsub("automake --add-missing --copy", "%{__automake}", $0); |
438df441 | 419 | $0 = fixedsub("automake -a --foreign --copy", "%{__automake}", $0); |
a5ab7844 | 420 | $0 = fixedsub("automake -a -c --foreign", "%{__automake}", $0); |
82e1c3ee | 421 | $0 = fixedsub("automake -a -c", "%{__automake}", $0); |
438df441 ER |
422 | $0 = fixedsub("libtoolize --force --automake --copy", "%{__libtoolize}", $0); |
423 | $0 = fixedsub("libtoolize -c -f --automake", "%{__libtoolize}", $0); | |
b5f420e4 ER |
424 | |
425 | sub(/^aclocal$/, "%{__aclocal}"); | |
426 | sub(/^autoheader$/, "%{__autoheader}"); | |
427 | sub(/^autoconf$/, "%{__autoconf}"); | |
428 | sub(/^automake$/, "%{__automake}"); | |
82e1c3ee | 429 | sub(/^libtoolize$/, "%{__libtoolize}"); |
d2bcf054 | 430 | |
023aea7a ER |
431 | # atrpms |
432 | $0 = fixedsub("%perl_configure", "%{__perl} Makefile.PL \\\n\tINSTALLDIRS=vendor", $0); | |
433 | $0 = fixedsub("%perl_makecheck", "%{?with_tests:%{__make} test}", $0); | |
16397458 | 434 | } |
435 | ||
337741dd | 436 | ########## |
437 | # %clean # | |
438 | ########## | |
37403736 | 439 | /^%clean/, (!/^%clean/ && $0 ~ SECTIONS) { |
aa666779 | 440 | did_clean = 1 |
6702f869 | 441 | |
42cd9911 | 442 | use_macros() |
aa666779 SZ |
443 | } |
444 | ||
337741dd | 445 | ############ |
446 | # %install # | |
447 | ############ | |
37403736 | 448 | /^%install/, (!/^%install/ && $0 ~ SECTIONS) { |
d2bcf054 | 449 | |
32bb73d8 | 450 | preamble = 0 |
d2bcf054 | 451 | |
43042a15 | 452 | # foreign rpms |
6af280a5 | 453 | sub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT") |
42cd9911 ER |
454 | sub("%buildroot", "$RPM_BUILD_ROOT"); |
455 | sub("%{buildroot}", "$RPM_BUILD_ROOT"); | |
43042a15 | 456 | |
6af280a5 | 457 | if (/^[ \t]*rm([ \t]+-[rf]+)*[ \t]+(\${?RPM_BUILD_ROOT}?|%{?buildroot}?)/ && did_rmroot==0) { |
aa666779 | 458 | did_rmroot=1 |
b741d74d SZ |
459 | print "rm -rf $RPM_BUILD_ROOT" |
460 | next | |
461 | } | |
a9f3f77c | 462 | |
aa666779 | 463 | if (!/^(#?[ \t]*)$/ && !/^%install/ && did_rmroot==0) { |
b741d74d | 464 | print "rm -rf $RPM_BUILD_ROOT" |
aa666779 | 465 | did_rmroot=1 |
b741d74d | 466 | } |
d2bcf054 | 467 | |
42cd9911 ER |
468 | if (tmpdir) { |
469 | buildroot = tmpdir "/" name "-" version "-root-" ENVIRON["USER"] | |
ab73bfb4 | 470 | gsub(buildroot, "$RPM_BUILD_ROOT") |
42cd9911 | 471 | } |
ab73bfb4 | 472 | |
42cd9911 ER |
473 | if (!/%{_lib}/) { |
474 | sub("\$RPM_BUILD_ROOT/%", "$RPM_BUILD_ROOT%") | |
475 | } | |
1f948ece | 476 | |
b741d74d | 477 | use_macros() |
d2bcf054 | 478 | |
16397458 | 479 | # 'install -d' instead 'mkdir -p' |
480 | if (/mkdir -p/) | |
32bb73d8 | 481 | sub(/mkdir -p/, "install -d") |
0071ffb3 | 482 | |
96b01e16 | 483 | # cp -a already implies cp -r |
42cd9911 | 484 | sub(/^cp -ar/, "cp -a") |
d2bcf054 | 485 | |
a9f3f77c | 486 | # No '-u root' or '-g root' for 'install' |
7d285e55 | 487 | if (/^install/ && /-[ug][ \t]*root/) |
32bb73d8 | 488 | gsub(/-[ug][ \t]*root /, "") |
d2bcf054 | 489 | |
db929c93 ER |
490 | if (/^install/ && /-m[ \t]*[0-9]+/) |
491 | gsub(/-m[ \t]*[0-9]+ /, "") | |
d2bcf054 | 492 | |
6b02d821 | 493 | # No lines contain 'chown' or 'chgrp' if owner/group is 'root' |
a9f3f77c | 494 | if (($1 ~ /chown/ && $2 ~ /root\.root/) || ($1 ~ /chgrp/ && $2 ~ /root/)) |
32bb73d8 | 495 | next |
d2bcf054 | 496 | |
a9f3f77c | 497 | # No lines contain 'chmod' if it sets the modes to '644' |
7d285e55 | 498 | if ($1 ~ /chmod/ && $2 ~ /644/) |
32bb73d8 | 499 | next |
023aea7a | 500 | |
023aea7a ER |
501 | # atrpms |
502 | $0 = fixedsub("%perl_makeinstall", "%{__make} pure_install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0); | |
16397458 | 503 | } |
504 | ||
337741dd | 505 | ########## |
506 | # %files # | |
507 | ########## | |
37403736 | 508 | /^%files/, (!/^%files/ && $0 ~ SECTIONS) { |
32bb73d8 | 509 | preamble = 0 |
6cfaf341 | 510 | did_files = 1 |
d2bcf054 | 511 | |
d71e64d1 | 512 | if ($0 ~ /^%files/) |
32bb73d8 | 513 | defattr = 1 |
d2bcf054 | 514 | |
0bbcf6b4 | 515 | use_files_macros() |
16397458 | 516 | } |
517 | ||
337741dd | 518 | ############## |
519 | # %changelog # | |
520 | ############## | |
37403736 | 521 | /^%changelog/, (!/^%changelog/ && $0 ~ SECTIONS) { |
32bb73d8 | 522 | preamble = 0 |
b741d74d | 523 | has_changelog = 1 |
dae2a065 | 524 | skip = 0 |
16397458 | 525 | # There should be some CVS keywords on the first line of %changelog. |
dae2a065 | 526 | if (boc == 3) { |
a5e6295e | 527 | if ($0 !~ _cvsmailfeedback) { |
e0ab434c | 528 | print "* %{date} " _cvsmailfeedback > changelog_file |
a5e6295e | 529 | } else { |
dae2a065 | 530 | skip = 1 |
a5e6295e | 531 | } |
dae2a065 | 532 | boc = 2 |
1fefb3da | 533 | } |
dae2a065 | 534 | if (boc == 2 && !skip) { |
1fefb3da | 535 | if (!/All persons listed below/) { |
e6ca8854 | 536 | printf "All persons listed below can be reached at " > changelog_file |
e0ab434c | 537 | print "<cvs_login>" _cvsmaildomain "\n" > changelog_file |
a5e6295e | 538 | } else { |
dae2a065 | 539 | skip = 1 |
a5e6295e | 540 | } |
7bfb8673 | 541 | boc = 1 |
16397458 | 542 | } |
dae2a065 JB |
543 | if (boc == 1 && !skip) { |
544 | if (!/^$/) { | |
a5e6295e | 545 | if (!/\$.*Log:.*\$/) { |
dae2a065 | 546 | print "$" "Log:$" > changelog_file |
a5e6295e | 547 | } |
dae2a065 JB |
548 | boc = 0 |
549 | } | |
1fefb3da | 550 | } |
6544a775 | 551 | # Define date macro. |
1fefb3da | 552 | if (boc == 4) { |
57862255 | 553 | if (date == 0) { |
308c7423 | 554 | printf "%%define date\t%%(echo `LC_ALL=\"C\"" > changelog_file |
555 | print " date +\"%a %b %d %Y\"`)" > changelog_file | |
1a2653e7 | 556 | date = 1 |
57862255 | 557 | } |
1fefb3da | 558 | boc = 3 |
6544a775 | 559 | } |
308c7423 | 560 | |
a5e6295e ER |
561 | sub(/[ \t]+$/, ""); |
562 | if (!/^%[a-z]+$/ || /changelog/) { | |
563 | # stop changelog if "real" changelog starts | |
564 | if (boc == 0 && /^\* /) { | |
565 | boc = -1 | |
566 | } | |
567 | if (boc == -1) { | |
568 | next; | |
569 | } | |
308c7423 | 570 | print > changelog_file |
a5e6295e | 571 | } else { |
308c7423 | 572 | |
a5e6295e | 573 | } |
308c7423 | 574 | next |
16397458 | 575 | } |
576 | ||
337741dd | 577 | ########### |
578 | # SCRIPTS # | |
579 | ########### | |
37403736 | 580 | /^%pre/, (!/^%pre/ && $0 ~ SECTIONS) { |
337741dd | 581 | preamble = 0 |
c6aa1f63 | 582 | |
afca35ce ER |
583 | if (gsub("/usr/sbin/useradd", "%useradd")) { |
584 | sub(" 2> /dev/null \|\| :", ""); | |
585 | sub(" >/dev/null 2>&1 \|\|:", ""); | |
586 | } | |
587 | ||
c6aa1f63 ER |
588 | # %useradd and %groupadd may not be wrapped |
589 | if (/%(useradd|groupadd).*\\$/) { | |
590 | a = $0; getline; | |
591 | sub(/^[\s\t]*/, ""); | |
592 | $0 = substr(a, 1, length(a) - 1) $0; | |
593 | } | |
afca35ce | 594 | use_script_macros() |
337741dd | 595 | } |
c6aa1f63 | 596 | |
37403736 | 597 | /^%post/, (!/^%post/ && $0 ~ SECTIONS) { |
337741dd | 598 | preamble = 0 |
99b02f64 | 599 | use_macros() |
337741dd | 600 | } |
37403736 | 601 | /^%preun/, (!/^%preun/ && $0 ~ SECTIONS) { |
337741dd | 602 | preamble = 0 |
eba571c8 | 603 | use_macros() |
337741dd | 604 | } |
37403736 | 605 | /^%postun/, (!/^%postun/ && $0 ~ SECTIONS) { |
337741dd | 606 | preamble = 0 |
afca35ce | 607 | use_script_macros() |
337741dd | 608 | } |
37403736 | 609 | /^%triggerin/, (!/^%triggerin/ && $0 ~ SECTIONS) { |
74e9aad8 | 610 | preamble = 0 |
afca35ce | 611 | use_script_macros() |
74e9aad8 | 612 | } |
37403736 | 613 | /^%triggerun/, (!/^%triggerun/ && $0 ~ SECTIONS) { |
74e9aad8 | 614 | preamble = 0 |
afca35ce | 615 | use_script_macros() |
74e9aad8 | 616 | } |
37403736 | 617 | /^%triggerpostun/, (!/^%triggerpostun/ && $0 ~ SECTIONS) { |
74e9aad8 | 618 | preamble = 0 |
afca35ce | 619 | use_script_macros() |
74e9aad8 | 620 | } |
37403736 | 621 | /^%pretrans/, (!/^%pretrans/ && $0 ~ SECTIONS) { |
74e9aad8 | 622 | preamble = 0 |
afca35ce | 623 | use_script_macros() |
74e9aad8 | 624 | } |
37403736 | 625 | /^%posttrans/, (!/^%posttrans/ && $0 ~ SECTIONS) { |
74e9aad8 | 626 | preamble = 0 |
afca35ce | 627 | use_script_macros() |
74e9aad8 | 628 | } |
b7ab5ec4 ER |
629 | /^%verifyscript/, (!/^%verifyscript/ && $0 ~ SECTIONS) { |
630 | preamble = 0 | |
afca35ce | 631 | use_script_macros() |
b7ab5ec4 ER |
632 | } |
633 | /^%check/, (!/^%check/ && $0 ~ SECTIONS) { | |
634 | preamble = 0 | |
afca35ce | 635 | use_script_macros() |
b7ab5ec4 | 636 | } |
337741dd | 637 | |
638 | ############# | |
639 | # PREAMBLES # | |
640 | ############# | |
16397458 | 641 | preamble == 1 { |
7d285e55 | 642 | # There should not be a space after the name of field |
643 | # and before the colon. | |
32bb73d8 | 644 | sub(/[ \t]*:/, ":") |
d2bcf054 | 645 | |
1ea917a3 ER |
646 | if (/^%perl_module_wo_prefix/) { |
647 | name = $2 | |
648 | version = $3 | |
649 | release = "0." fixedsub(".%{disttag}.at", "", $4) | |
650 | } | |
651 | ||
32bb73d8 | 652 | field = tolower($1) |
00956e6f | 653 | fieldnlower = $1 |
8538dc99 | 654 | if (field ~ /summary:/ && !/etc\.$/ && !/Inc\.$/) { |
61182440 ER |
655 | sub(/\.$/, "", $0); |
656 | } | |
2873c9d1 | 657 | if (field ~ /group(\([^)]+\)):/) |
5b95e677 | 658 | next |
2873c9d1 | 659 | if (field ~ /group:/) { |
660 | format_preamble() | |
c0bcd06f ER |
661 | group = $0; |
662 | sub(/^[^ \t]*[ \t]*/, "", group); | |
663 | ||
664 | sub(/^Utilities\//,"Applications/", group) | |
665 | sub(/^Games/,"Applications/Games", group) | |
666 | sub(/^X11\/Games/,"X11/Applications/Games", group) | |
667 | sub(/^X11\/GNOME\/Development\/Libraries/,"X11/Development/Libraries", group) | |
668 | sub(/^X11\/GNOME\/Applications/,"X11/Applications", group) | |
669 | sub(/^X11\/GNOME/,"X11/Applications", group) | |
670 | sub(/^X11\/Utilities/,"X11/Applications", group) | |
671 | sub(/^X11\/Games\/Strategy/,"X11/Applications/Games/Strategy", group) | |
ff0b284d | 672 | sub(/^X11\/Library/,"X11/Libraries", group) |
c0bcd06f ER |
673 | sub(/^Shells/,"Applications/Shells", group) |
674 | sub(/^System Environment\/Libraries$/, "Libraries", group) | |
ff0b284d | 675 | sub(/^Library\/Development$/, "Development/Libraries", group) |
c0bcd06f ER |
676 | sub(/^System Environment\/Daemons$/, "Daemons", group) |
677 | sub(/^Applications\/Internet$/, "Applications/Networking", group) | |
678 | sub(/^Applications\/Daemons$/, "Daemons", group) | |
679 | sub(/^Application\/Multimedia$/, "Applications/Multimedia", group) | |
680 | sub(/^System\/Servers$/, "Daemons", group) | |
681 | sub(/^X11\/Xserver$/, "X11/Servers", group) | |
682 | sub(/^X11\/XFree86/, "X11", group) | |
683 | sub(/^Applications\/Compilers$/, "Development/Languages", group) | |
684 | sub(/^Applications\/Internet\/Peer to Peer/, "Applications/Networking", group) | |
685 | sub(/^Networking\/Deamons$/, "Networking/Daemons", group) | |
686 | sub(/^Development\/Docs$/, "Documentation", group) | |
15677f60 | 687 | sub(/^Development\/Documentation$/, "Documentation", group) |
f0c5c231 | 688 | sub(/^System Environment\/Kernel$/, "Base/Kernel", group) |
15677f60 ER |
689 | sub(/^Development\/Libraries\/Java$/, "Development/Languages/Java", group) |
690 | sub(/^Development\/Java/, "Development/Languages/Java", group) | |
691 | sub(/^Development\/Testing$/, "Development", group) | |
692 | sub(/^Text Processing\/Markup\/HTML$/, "Applications/Text", group) | |
693 | sub(/^Text Processing\/Markup\/XML$/, "Applications/Text", group) | |
e4339f15 ER |
694 | sub(/^Web\/Database$/, "Applications/WWW", group) |
695 | sub(/^System Environment\/Base$/, "Base", group) | |
c574762f | 696 | sub(/^System$/, "Base", group) |
0f558722 | 697 | sub(/^Applications\/Productivity$/, "X11/Applications", group) |
13dda4dc ER |
698 | sub(/^Database$/, "Applications/Databases", group) |
699 | sub(/^Development\/Code Generators$/, "Development", group) | |
c0bcd06f ER |
700 | |
701 | $0 = "Group:\t\t" group | |
702 | ||
703 | if (group ~ /^X11/ && x11 == 0) # Is it X11 application? | |
2b4c59bc | 704 | x11 = 1 |
b2ba29bc | 705 | |
c0bcd06f | 706 | byl_plik_z_groupmi = 0 |
b2ba29bc SZ |
707 | byl_opis_grupy = 0 |
708 | while ((getline linia_grup < groups_file) > 0) { | |
c0bcd06f ER |
709 | byl_plik_z_groupmi = 1 |
710 | if (linia_grup == group) { | |
b2ba29bc SZ |
711 | byl_opis_grupy = 1 |
712 | break | |
713 | } | |
714 | } | |
ada044b5 | 715 | |
c0bcd06f | 716 | if (!byl_plik_z_groupmi) |
b2ba29bc SZ |
717 | print "######\t\t" groups_file ": no such file" |
718 | else if (!byl_opis_grupy) | |
719 | print "######\t\t" "Unknown group!" | |
d2bcf054 | 720 | |
b2ba29bc | 721 | close(groups_file) |
6cfaf341 | 722 | did_groups = 1 |
b2ba29bc | 723 | } |
d2bcf054 | 724 | |
7f2507f0 | 725 | if (field ~ /prereq:/) { |
37457756 | 726 | sub(/Pre[Rr]eq:/, "Requires:", $1); |
7f2507f0 ER |
727 | } |
728 | ||
6639ea54 | 729 | # split (build)requires, obsoletes on commas |
701dce37 | 730 | if (field ~ /(obsoletes|requires|provides|conflicts):/ && NF > 2) { |
9911efc1 ER |
731 | value = substr($0, index($0, $2)); |
732 | $0 = format_requires($1, value); | |
2776dcb6 | 733 | } |
42cd9911 | 734 | |
7198ba75 ER |
735 | # BR: tar (and others) is to common (rpm-build requires it) |
736 | if (field ~ /^buildrequires:/) { | |
a3adad27 ER |
737 | l = substr($0, index($0, $2)); |
738 | if (l == "awk" || | |
739 | l == "binutils" || | |
740 | l == "bzip2" || | |
741 | l == "cpio" || | |
742 | l == "diffutils" || | |
743 | l == "elfutils" || | |
744 | l == "fileutils" || | |
745 | l == "findutils" || | |
746 | l == "glibc-devel" || | |
747 | l == "grep" || | |
748 | l == "gzip" || | |
749 | l == "make" || | |
750 | l == "patch" || | |
751 | l == "sed" || | |
752 | l == "sh-utils" || | |
753 | l == "tar" || | |
754 | l == "textutils") { | |
7198ba75 ER |
755 | next |
756 | } | |
15677f60 | 757 | |
42cd9911 | 758 | # perhaps we have common known name? |
15677f60 | 759 | |
42cd9911 | 760 | # jpackages |
15677f60 | 761 | sub(/^java-devel$/, "jdk", $2); |
15677f60 ER |
762 | sub(/^log4j$/, "jakarta-log4j", $2); |
763 | sub(/^oro$/, "jakarta-oro", $2); | |
13dda4dc | 764 | sub(/^jakarta-ant$/, "ant", $2); |
15677f60 | 765 | sub(/^xerces-j2$/, "xerces-j", $2); |
15677f60 ER |
766 | sub(/^ldapjdk$/, "ldapsdk", $2); |
767 | sub(/^saxon-scripts$/, "saxon", $2); | |
13dda4dc ER |
768 | sub(/^xalan-j2$/, "xalan-j", $2); |
769 | sub(/^xerces-j2$/, "xerces-j", $2); | |
cdf38256 | 770 | |
42cd9911 | 771 | replace_php_virtual_deps(); |
7198ba75 ER |
772 | } |
773 | ||
cdf38256 | 774 | if (field ~ /^requires:/) { |
42cd9911 ER |
775 | replace_php_virtual_deps(); |
776 | } | |
cdf38256 ER |
777 | |
778 | ||
ea66cafb | 779 | # obsolete/unwanted tags |
98125519 | 780 | if (field ~ /vendor:|packager:|distribution:|docdir:|prefix:|icon:|author:|author-email:|metadata-version:/) { |
32bb73d8 | 781 | next |
9911efc1 | 782 | } |
d2bcf054 | 783 | |
6cfaf341 | 784 | if (field ~ /buildroot:/) { |
faabbd89 | 785 | $0 = $1 "%{tmpdir}/%{name}-%{version}-root-%(id -u -n)" |
6cfaf341 ER |
786 | did_build_root = 1 |
787 | } | |
7d285e55 | 788 | |
7d285e55 | 789 | # Use "License" instead of "Copyright" if it is (L)GPL or BSD |
89411bba | 790 | if (field ~ /copyright:/ && $2 ~ /GPL|BSD/) { |
32bb73d8 | 791 | $1 = "License:" |
89411bba | 792 | } |
d2bcf054 | 793 | |
baec8afd ER |
794 | if (field ~ /license:/) { |
795 | l = substr($0, index($0, $2)); | |
796 | if (l == "Python Software Foundation License") { | |
797 | l = "PSF" | |
798 | } | |
799 | $0 = "License:\t" l; | |
800 | } | |
801 | ||
802 | ||
1ea917a3 | 803 | if (field ~ /name:/) { |
95266981 | 804 | if ($2 == "%{name}" && name) { |
2fce9750 ER |
805 | $2 = name |
806 | } | |
32bb73d8 | 807 | name = $2 |
1ea917a3 ER |
808 | name_seen = 1; |
809 | } | |
7d285e55 | 810 | |
1ea917a3 | 811 | if (field ~ /version:/) { |
2fce9750 ER |
812 | if ($2 == "%{version}" && version) { |
813 | $2 = version | |
814 | } | |
32bb73d8 | 815 | version = $2 |
1ea917a3 ER |
816 | version_seen = 1; |
817 | } | |
818 | ||
819 | if (field ~ /release:/) { | |
2fce9750 ER |
820 | if ($2 == "%{release}" && release) { |
821 | $2 = release | |
822 | } | |
6cfaf341 | 823 | sub(/%atrelease /, "0.", $0) |
1ea917a3 ER |
824 | release = $2 |
825 | release_seen = 1; | |
826 | } | |
7d285e55 | 827 | |
98125519 | 828 | |
246dbfc6 SZ |
829 | if (field ~ /serial:/) |
830 | $1 = "Epoch:" | |
017fc990 | 831 | |
98125519 ER |
832 | if (field ~ /home-page:/) |
833 | $1 = "URL:" | |
834 | ||
4edf81f6 | 835 | # proper caps |
7e50ffd2 | 836 | if (field ~ /^url:$/) |
4edf81f6 ER |
837 | $1 = "URL:" |
838 | ||
98125519 ER |
839 | if (field ~ /^description:$/) |
840 | $1 = "\n%description\n" | |
841 | ||
7d285e55 | 842 | # Use %{name} and %{version} in the filenames in "Source:" |
93ad28bc | 843 | if (field ~ /^source/ || field ~ /patch/) { |
32bb73d8 | 844 | n = split($2, url, /\//) |
66437059 SZ |
845 | if (url[n] ~ /\.gz$/) { |
846 | url[n+1] = ".gz" url[n+1] | |
847 | sub(/\.gz$/,"",url[n]) | |
848 | } | |
849 | if (url[n] ~ /\.zip$/) { | |
850 | url[n+1] = ".zip" url[n+1] | |
851 | sub(/\.zip$/,"",url[n]) | |
852 | } | |
853 | if (url[n] ~ /\.tar$/) { | |
854 | url[n+1] = ".tar" url[n+1] | |
855 | sub(/\.tar$/,"",url[n]) | |
856 | } | |
857 | if (url[n] ~ /\.patch$/) { | |
858 | url[n+1] = ".patch" url[n+1] | |
859 | sub(/\.patch$/,"",url[n]) | |
860 | } | |
861 | if (url[n] ~ /\.bz2$/) { | |
862 | url[n+1] = ".bz2" url[n+1] | |
863 | sub(/\.bz2$/,"",url[n]) | |
864 | } | |
45465264 SZ |
865 | if (url[n] ~ /\.logrotate$/) { |
866 | url[n+1] = ".logrotate" url[n+1] | |
867 | sub(/\.logrotate$/,"",url[n]) | |
868 | } | |
869 | if (url[n] ~ /\.pamd$/) { | |
870 | url[n+1] = ".pamd" url[n+1] | |
871 | sub(/\.pamd$/,"",url[n]) | |
872 | } | |
873 | ||
bf246f77 | 874 | # allow %{name} only in last url component |
ccb3335c ER |
875 | s = "" |
876 | for (i = 1; i <= n; i++) { | |
877 | url[i] = fixedsub("%{name}", name, url[i]) | |
878 | if (s) { | |
879 | s = s "/" url[i] | |
880 | } else { | |
881 | s = url[i] | |
882 | } | |
883 | } | |
884 | $2 = s url[n+1] | |
885 | ||
32bb73d8 | 886 | filename = url[n] |
4c237f9d ER |
887 | if (name) { |
888 | url[n] = fixedsub(name, "%{name}", url[n]) | |
889 | } | |
85bbdbed | 890 | if (field ~ /source/) { |
4c237f9d ER |
891 | if (version) { |
892 | url[n] = fixedsub(version, "%{version}", url[n]) | |
893 | } | |
85bbdbed ER |
894 | if (_beta) { |
895 | url[n] = fixedsub(_beta, "%{_beta}", url[n]) | |
896 | } | |
897 | if (_rc) { | |
898 | url[n] = fixedsub(_rc, "%{_rc}", url[n]) | |
899 | } | |
f8281d0c ER |
900 | if (_pre) { |
901 | url[n] = fixedsub(_pre, "%{_pre}", url[n]) | |
902 | } | |
85bbdbed ER |
903 | if (_snap) { |
904 | url[n] = fixedsub(_snap, "%{_snap}", url[n]) | |
905 | } | |
906 | } | |
f175a699 | 907 | # assigning to $2 kills preamble formatting |
66437059 | 908 | $2 = fixedsub(filename, url[n], $2) |
d2bcf054 ER |
909 | |
910 | # sourceforge urls | |
4d3a0396 ER |
911 | sub("[?&]big_mirror=.*$", "", $2); |
912 | sub("[?&]modtime=.*$", "", $2); | |
913 | ||
d749eebf | 914 | sub("[?]use_mirror=.*$", "", $2); |
85bbdbed | 915 | sub("[?]download$", "", $2); |
4d3a0396 | 916 | |
9764550e | 917 | sub("^http://prdownloads\.sourceforge\.net/", "http://dl.sourceforge.net/", $2) |
15677f60 | 918 | sub("^http://download\.sf\.net/", "http://dl.sourceforge.net/", $2) |
01bcb780 | 919 | sub("^http://downloads\.sourceforge\.net/", "http://dl.sourceforge.net/", $2) |
d749eebf ER |
920 | |
921 | sub("^http://.*\.dl\.sourceforge\.net/", "http://dl.sourceforge.net/", $2) | |
c13284af | 922 | sub("^http://dl\.sourceforge\.net/sourceforge/", "http://dl.sourceforge.net/", $2) |
d347630d | 923 | sub("^http://dl\.sf\.net/", "http://dl.sourceforge.net/", $2) |
7d285e55 | 924 | } |
be7dead6 | 925 | |
d2bcf054 | 926 | |
93ad28bc | 927 | if (field ~ /^source:/) |
d2bcf054 | 928 | $1 = "Source0:" |
32bb73d8 | 929 | |
ff9e2987 | 930 | if (field ~ /^patch:/) |
32bb73d8 | 931 | $1 = "Patch0:" |
d2bcf054 | 932 | |
0311af17 | 933 | kill_preamble_macros(); |
32bb73d8 | 934 | format_preamble() |
d2bcf054 | 935 | |
12d9b2b2 ER |
936 | if (field ~ /requires/) { |
937 | # atrpms | |
938 | $0 = fixedsub("%{eversion}", "%{epoch}:%{version}-%{release}", $0); | |
939 | } | |
16397458 | 940 | } |
941 | ||
8671b2a2 ER |
942 | /^%bcond_/ { |
943 | # do nothing | |
944 | ||
945 | next | |
946 | } | |
7c43f31c ER |
947 | |
948 | # sort BR/R! | |
949 | # | |
950 | # NOTES: | |
951 | # - mixing BR/R and anything else confuses this (all will be sorted together) | |
42cd9911 | 952 | # so don't do that. |
7c43f31c | 953 | # - comments leading the BR/R can not be associated, |
42cd9911 | 954 | # so don't adapterize when the BR/R are mixed with comments |
7c43f31c | 955 | ENVIRON["SKIP_SORTBR"] != 1 && preamble == 1 && $0 ~ PREAMBLE_TAGS, $0 ~ PREAMBLE_TAGS { |
f175a699 | 956 | if ($1 ~ /Pre[Rr]eq:/) { |
37457756 | 957 | sub(/Pre[Rr]eq:/, "Requires:", $1); |
7c43f31c ER |
958 | } |
959 | format_preamble() | |
73eaf7b6 | 960 | # kill_preamble_macros(); # breaks tabbing |
7c43f31c ER |
961 | |
962 | b_idx++; | |
963 | l = substr($0, index($0, $2)); | |
964 | b_ktmp = b_makekey($1, l); | |
965 | b_key[b_idx] = b_ktmp; | |
966 | b_val[b_ktmp] = $0; | |
967 | ||
968 | next; | |
969 | } | |
970 | ||
7c43f31c ER |
971 | preamble == 1 { |
972 | if (b_idx > 0) { | |
973 | isort(b_key, b_idx); | |
974 | for (i = 1; i <= b_idx; i++) { | |
89411bba ER |
975 | v = b_val[b_key[i]]; |
976 | sub(/[ \t]+$/, "", v); | |
977 | print "" v; | |
7c43f31c ER |
978 | } |
979 | b_idx = 0 | |
980 | } | |
981 | } | |
982 | ||
2b4c59bc | 983 | # main() ;-) |
16397458 | 984 | { |
32bb73d8 | 985 | preamble = 1 |
d2bcf054 | 986 | |
62565bd5 | 987 | sub(/[ \t]+$/, "") |
32bb73d8 | 988 | |
1ea917a3 ER |
989 | |
990 | if (name_seen == 0 && name) { | |
bd313400 | 991 | print "Name:\t\t" name |
1ea917a3 ER |
992 | name_seen = 1 |
993 | } | |
994 | ||
995 | if (version_seen == 0 && version) { | |
996 | print "Version:\t" version | |
997 | version_seen = 1 | |
998 | } | |
999 | ||
1000 | if (release_seen == 0 && release) { | |
1001 | print "Release:\t" release | |
1002 | release_seen = 1 | |
1003 | } | |
98125519 ER |
1004 | |
1005 | if (did_build_root == 0) { | |
6cfaf341 | 1006 | # print "BuildRoot:\t%{tmpdir}/%{name}-%{version}-root-%(id -u -n)" |
98125519 ER |
1007 | did_build_root = 1 |
1008 | } | |
6cfaf341 ER |
1009 | if (did_groups == 0) { |
1010 | # print "Group:\t\tunknown" | |
1011 | did_groups = 1 | |
1012 | } | |
57862255 | 1013 | } |
1014 | ||
6b02d821 | 1015 | |
57862255 | 1016 | END { |
0bbcf6b4 | 1017 | if (do_not_touch_anything) |
1018 | exit 0 | |
d2bcf054 | 1019 | |
42cd9911 ER |
1020 | # TODO: need to output these in proper place |
1021 | if (BR_count > 0) { | |
1022 | for (i = 0; i <= BR_count; i++) { | |
1023 | print BR[i]; | |
1024 | } | |
1025 | } | |
a3c6bbce | 1026 | |
6b02d821 | 1027 | close(changelog_file) |
1028 | while ((getline < changelog_file) > 0) | |
1029 | ||
1030 | system("rm -f " changelog_file) | |
3c6a8648 | 1031 | |
aa666779 SZ |
1032 | if (did_clean == 0) { |
1033 | print "" | |
1034 | print "%clean" | |
1035 | print "rm -rf $RPM_BUILD_ROOT" | |
1036 | } | |
1037 | ||
b741d74d SZ |
1038 | if (date == 0) { |
1039 | print "" | |
1040 | print "%define date\t%(echo `LC_ALL=\"C\" date +\"%a %b %d %Y\"`)" | |
1041 | } | |
d2bcf054 | 1042 | |
a3c6bbce | 1043 | if (has_changelog == 0) { |
1a2653e7 | 1044 | print "%changelog" |
42cd9911 | 1045 | } |
b741d74d | 1046 | |
a3c6bbce | 1047 | if (boc > 2) { |
99f2e2ca | 1048 | print "* %{date} PLD Team <feedback@pld-linux.org>" |
42cd9911 | 1049 | } |
1fefb3da | 1050 | if (boc > 1) { |
9b223e29 | 1051 | printf "All persons listed below can be reached at " |
99f2e2ca | 1052 | print "<cvs_login>@pld-linux.org\n" |
57862255 | 1053 | } |
a3c6bbce | 1054 | if (boc > 0) { |
1fefb3da | 1055 | print "$" "Log:$" |
42cd9911 | 1056 | } |
16397458 | 1057 | } |
1058 | ||
2b4c59bc | 1059 | function fixedsub(s1,s2,t, ind) { |
66437059 | 1060 | # substitutes fixed strings (not regexps) |
2b4c59bc | 1061 | if (ind = index(t,s1)) |
1062 | t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1)) | |
1063 | return t | |
66437059 SZ |
1064 | } |
1065 | ||
be7dead6 | 1066 | # There should be one or two tabs after the colon. |
1067 | function format_preamble() | |
1068 | { | |
f175a699 | 1069 | if (/^#/ || /^%bcond_with/) { |
c74a804a ER |
1070 | return; |
1071 | } | |
32bb73d8 | 1072 | sub(/:[ \t]*/, ":") |
13dda4dc ER |
1073 | if (match($0, /[A-Za-z0-9(),#_ \t.-]+[ \t]*:[ \t]*/) == 1) { |
1074 | if (RLENGTH < 8) { | |
32bb73d8 | 1075 | sub(/:/, ":\t\t") |
42cd9911 | 1076 | } else { |
32bb73d8 | 1077 | sub(/:/, ":\t") |
42cd9911 | 1078 | } |
be7dead6 | 1079 | } |
1080 | } | |
1081 | ||
a9f3f77c | 1082 | # Replace directly specified directories with macros |
1083 | function use_macros() | |
1084 | { | |
ff9e2987 ER |
1085 | # -m, --skip-macros, --no-macros -- skip macros subst |
1086 | if (ENVIRON["SKIP_MACROS"]) { | |
1087 | return | |
1088 | } | |
1089 | ||
5110bd60 ER |
1090 | # leave inline sed lines alone |
1091 | if (/(%{__sed}|sed) -i -e/) { | |
1092 | return; | |
1093 | } | |
1094 | ||
42cd9911 ER |
1095 | sub("%{_defaultdocdir}", "%{_docdir}"); |
1096 | sub("%{_bindir}/perl", "%{__perl}"); | |
1097 | sub("%{_bindir}/python", "%{__python}"); | |
32b4e718 | 1098 | |
bf42735e ER |
1099 | gsub(infodir, "%{_infodir}") |
1100 | ||
c9cb5723 ER |
1101 | gsub(perl_sitearch, "%{perl_sitearch}") |
1102 | gsub(perl_archlib, "%{perl_archlib}") | |
1103 | gsub(perl_privlib, "%{perl_privlib}") | |
c9cb5723 ER |
1104 | gsub(perl_vendorlib, "%{perl_vendorlib}") |
1105 | gsub(perl_vendorarch, "%{perl_vendorarch}") | |
1106 | gsub(perl_sitelib, "%{perl_sitelib}") | |
f9ae8d4e ER |
1107 | |
1108 | gsub(py_sitescriptdir, "%{py_sitescriptdir}") | |
6cfaf341 | 1109 | gsub(py_sitedir, "%{py_sitedir}") |
96c9c215 | 1110 | gsub(py_scriptdir, "%{py_scriptdir}") |
9086b883 | 1111 | gsub("%{_libdir}/python2.4/site-packages", "%{py_sitedir}") |
6dd98e9f | 1112 | gsub("%{python_sitelib}", "%{py_sitedir}") |
9f2514dd ER |
1113 | |
1114 | gsub(ruby_archdir, "%{ruby_archdir}") | |
1115 | gsub(ruby_ridir, "%{ruby_ridir}") | |
1116 | gsub(ruby_rubylibdir, "%{ruby_rubylibdir}") | |
1117 | gsub(ruby_sitearchdir, "%{ruby_sitearchdir}") | |
1118 | gsub(ruby_sitelibdir, "%{ruby_sitelibdir}") | |
1119 | ||
9086b883 ER |
1120 | gsub("%{_datadir}/applications", "%{_desktopdir}") |
1121 | gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}") | |
c9cb5723 | 1122 | |
6dd2a429 ER |
1123 | gsub(libdir, "%{_libdir}") |
1124 | ||
32bb73d8 | 1125 | gsub(bindir, "%{_bindir}") |
60e168c3 | 1126 | gsub("%{prefix}/bin", "%{_bindir}") |
5110bd60 | 1127 | if (prefix"/bin" == bindir) |
f0eca444 | 1128 | gsub("%{_prefix}/bin", "%{_bindir}") |
60e168c3 | 1129 | |
ec98fa64 | 1130 | for (c = 1; c <= NF; c++) { |
1131 | if ($c ~ sbindir "/fix-info-dir") | |
1132 | continue; | |
61780b93 ER |
1133 | if ($c ~ sbindir "/webapp") |
1134 | continue; | |
bf42735e ER |
1135 | if ($c ~ sbindir "/ldconfig") |
1136 | continue; | |
eb4e6786 ER |
1137 | if ($c ~ sbindir "/chsh") |
1138 | continue; | |
1139 | if ($c ~ sbindir "/usermod") | |
1140 | continue; | |
377c83f8 ER |
1141 | if ($c ~ sbindir "/chkconfig") |
1142 | continue; | |
519b18fb ER |
1143 | if ($c ~ sbindir "/installzope(product|3package)") |
1144 | continue; | |
ec98fa64 | 1145 | gsub(sbindir, "%{_sbindir}", $c) |
1146 | } | |
1147 | ||
60e168c3 | 1148 | gsub("%{prefix}/sbin", "%{_sbindir}") |
519b18fb | 1149 | if (prefix"/sbin" == sbindir) { |
5d0dc6ec | 1150 | gsub("%{_prefix}/sbin", "%{_sbindir}") |
519b18fb | 1151 | } |
60e168c3 | 1152 | |
38504ae2 | 1153 | for (c = 1; c <= NF; c++) { |
de2f7a1a | 1154 | if ($c ~ sysconfdir "/{?cron.") |
ec98fa64 | 1155 | continue; |
f0eca444 | 1156 | if ($c ~ sysconfdir "/{?crontab.d") |
af3306cc | 1157 | continue; |
269161f4 ER |
1158 | if ($c ~ sysconfdir "/{?env.d") |
1159 | continue; | |
66f4bdaa | 1160 | if ($c ~ sysconfdir "/{?modprobe.(d|conf)") |
791430b4 | 1161 | continue; |
7a1926d6 ER |
1162 | if ($c ~ sysconfdir "/{?udev/rules.d") |
1163 | continue; | |
f0eca444 | 1164 | if ($c ~ sysconfdir "/{?logrotate.d") |
38504ae2 | 1165 | continue; |
f0eca444 | 1166 | if ($c ~ sysconfdir "/{?pam.d") |
a56e8186 | 1167 | continue; |
f0eca444 | 1168 | if ($c ~ sysconfdir "/{?profile.d") |
3849d745 | 1169 | continue; |
f0eca444 | 1170 | if ($c ~ sysconfdir "/{?rc.d") |
d95318c3 | 1171 | continue; |
f0eca444 | 1172 | if ($c ~ sysconfdir "/{?security") |
a56e8186 | 1173 | continue; |
f0eca444 | 1174 | if ($c ~ sysconfdir "/{?skel") |
1021eb9a | 1175 | continue; |
f0eca444 | 1176 | if ($c ~ sysconfdir "/{?sysconfig") |
3849d745 | 1177 | continue; |
a3ad3d2b ER |
1178 | if ($c ~ sysconfdir "/{?shrc.d") |
1179 | continue; | |
7666ea52 ER |
1180 | if ($c ~ sysconfdir "/{?certs") |
1181 | continue; | |
3c475044 ER |
1182 | if ($c ~ sysconfdir "/{?X11") |
1183 | continue; | |
7e2a6e20 ER |
1184 | if ($c ~ sysconfdir "/{?ld.so.conf.d") |
1185 | continue; | |
ea66cafb ER |
1186 | if ($c ~ sysconfdir "/{?rpm") |
1187 | continue; | |
f175a699 | 1188 | if ($c ~ sysconfdir "/{?bash_completion.d") |
a3ad3d2b | 1189 | continue; |
f175a699 | 1190 | if ($c ~ sysconfdir "/{?samba") |
9fb04ca3 | 1191 | continue; |
e4339f15 ER |
1192 | if ($c ~ sysconfdir "/shells") |
1193 | continue; | |
f2bc05a6 ER |
1194 | if ($c ~ sysconfdir "/ppp") |
1195 | continue; | |
38504ae2 | 1196 | gsub(sysconfdir, "%{_sysconfdir}", $c) |
1197 | } | |
60e168c3 | 1198 | |
e5c731ae | 1199 | gsub(kdedocdir, "%{_kdedocdir}") |
99b02f64 | 1200 | gsub(docdir, "%{_docdir}") |
f175a699 | 1201 | gsub(php_pear_dir, "%{php_pear_dir}") |
99b02f64 | 1202 | |
10592e33 ER |
1203 | for (c = 1; c <= NF; c++) { |
1204 | if ($c ~ datadir "/automake") | |
1205 | continue; | |
5d60467e ER |
1206 | if ($c ~ datadir "/unsermake") |
1207 | continue; | |
a0e6069a ER |
1208 | if ($c ~ datadir "/file/magic.mime") |
1209 | continue; | |
10592e33 ER |
1210 | gsub(datadir, "%{_datadir}", $c) |
1211 | } | |
1212 | ||
60e168c3 | 1213 | gsub("%{prefix}/share", "%{_datadir}") |
10592e33 | 1214 | if (prefix"/share" == datadir) |
f0eca444 | 1215 | gsub("%{_prefix}/share", "%{_datadir}") |
60e168c3 | 1216 | |
03fbe002 ER |
1217 | # CFLAGS="-I/usr/include/ncurses is usually correct. |
1218 | if (!/-I\/usr\/include/) { | |
1219 | gsub(includedir, "%{_includedir}") | |
1220 | } | |
1221 | ||
60e168c3 | 1222 | gsub("%{prefix}/include", "%{_includedir}") |
03fbe002 | 1223 | if (prefix"/include" == includedir) { |
f0eca444 | 1224 | gsub("%{_prefix}/include", "%{_includedir}") |
03fbe002 | 1225 | } |
60e168c3 | 1226 | |
32bb73d8 | 1227 | gsub(mandir, "%{_mandir}") |
03fbe002 | 1228 | if ($0 !~ "%{_datadir}/manual") { |
5d0dc6ec | 1229 | gsub("%{_datadir}/man", "%{_mandir}") |
03fbe002 | 1230 | } |
cd1437c2 | 1231 | gsub("%{_prefix}/share/man", "%{_mandir}") |
1232 | gsub("%{prefix}/share/man", "%{_mandir}") | |
60e168c3 | 1233 | gsub("%{prefix}/man", "%{_mandir}") |
1234 | gsub("%{_prefix}/man", "%{_mandir}") | |
1235 | ||
32bb73d8 | 1236 | gsub(infodir, "%{_infodir}") |
60e168c3 | 1237 | gsub("%{prefix}/info", "%{_infodir}") |
1238 | gsub("%{_prefix}/info", "%{_infodir}") | |
1239 | ||
de2f7a1a | 1240 | if (prefix !~ "/X11R6") { |
1241 | gsub("%{_datadir}/aclocal", "%{_aclocaldir}") | |
1242 | } | |
bd4a2113 | 1243 | |
33957389 | 1244 | gsub(examplesdir, "%{_examplesdir}") |
d6255e69 | 1245 | |
982b68ad | 1246 | if (prefix != "/") { |
a0e6069a 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; | |
61780b93 ER |
1252 | if ($c ~ prefix "/sbin/webapp") |
1253 | continue; | |
eb4e6786 ER |
1254 | if ($c ~ prefix "/sbin/chsh") |
1255 | continue; | |
1256 | if ($c ~ prefix "/sbin/usermod") | |
1257 | continue; | |
519b18fb ER |
1258 | if ($c ~ prefix "/sbin/installzope(product|3package)") |
1259 | continue; | |
a0e6069a 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; | |
c0ae0d40 ER |
1266 | if ($c ~ prefix "/lib/pkgconfig") |
1267 | continue; | |
03fbe002 | 1268 | |
589bf4b3 ER |
1269 | # CFLAGS="-I/usr..." is usually correct. |
1270 | if (/-I\/usr/) | |
03fbe002 | 1271 | continue; |
4e1f12b2 ER |
1272 | # same for LDFLAGS="-L/usr..." |
1273 | if (/-L\/usr/) | |
1274 | continue; | |
03fbe002 | 1275 | |
a0e6069a ER |
1276 | gsub(prefix, "%{_prefix}", $c) |
1277 | } | |
ec98fa64 | 1278 | } |
982b68ad | 1279 | gsub("%{prefix}", "%{_prefix}") |
1280 | } | |
9a43821c | 1281 | |
77b6d1ab ER |
1282 | # replace back |
1283 | gsub("%{_includedir}/ncurses", "/usr/include/ncurses") | |
1284 | gsub("%{_includedir}/freetype", "/usr/include/freetype") | |
1285 | ||
9a43821c | 1286 | gsub("%{PACKAGE_VERSION}", "%{version}") |
1287 | gsub("%{PACKAGE_NAME}", "%{name}") | |
92bd39c6 | 1288 | |
7f5aa63a | 1289 | gsub("^make$", "%{__make}") |
1290 | gsub("^make ", "%{__make} ") | |
ca0c404d | 1291 | gsub("^gcc ", "%{__cc} ") |
58ca7d6b | 1292 | |
3353e0d5 ER |
1293 | # mandrake specs |
1294 | gsub("^%make$", "%{__make}") | |
1295 | gsub("^%make ", "%{__make} ") | |
1296 | gsub("^%makeinstall_std", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") | |
8705c1a9 | 1297 | gsub("^%{makeinstall}", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") |
2fce9750 | 1298 | gsub("^%makeinstall", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") |
3353e0d5 | 1299 | gsub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT") |
8705c1a9 | 1300 | gsub("^%{__install}", "install") |
8705c1a9 | 1301 | gsub("^%{__rm}", "rm") |
3353e0d5 ER |
1302 | gsub("%optflags", "%{rpmcflags}") |
1303 | gsub("%{compat_perl_vendorarch}", "%{perl_vendorarch}") | |
1304 | ||
32d93636 | 1305 | gsub("^%{__make} install DESTDIR=\$RPM_BUILD_ROOT", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") |
eba571c8 | 1306 | gsub("^fix-info-dir$", "[ ! -x /usr/sbin/fix-info-dir ] || /usr/sbin/fix-info-dir -c %{_infodir} >/dev/null 2>\\&1") |
023aea7a ER |
1307 | $0 = fixedsub("%buildroot", "$RPM_BUILD_ROOT", $0) |
1308 | $0 = fixedsub("%{buildroot}", "$RPM_BUILD_ROOT", $0) | |
2fce9750 ER |
1309 | $0 = fixedsub("CXXFLAGS=%{rpmcflags} %configure", "CXXFLAGS=%{rpmcflags}\n%configure", $0); |
1310 | ||
807cdd98 ER |
1311 | # split configure line to multiple lines |
1312 | if (/%configure / && !/\\$/) { | |
1313 | $0 = format_configure($0); | |
1314 | } | |
1315 | ||
e62422da ER |
1316 | gsub("%_bindir", "%{_bindir}") |
1317 | gsub("%_datadir", "%{_datadir}") | |
1318 | gsub("%_iconsdir", "%{_iconsdir}") | |
99b02f64 ER |
1319 | gsub("%_sbindir", "%{_sbindir}") |
1320 | gsub("%_mandir", "%{_mandir}") | |
1321 | gsub("%name", "%{name}") | |
42cd9911 ER |
1322 | gsub(/%__rm/, "rm"); |
1323 | gsub(/%__mkdir_p/, "install -d"); | |
1324 | gsub(/%__cp/, "cp"); | |
1325 | gsub(/%__ln_s/, "ln -s"); | |
1326 | gsub(/%__sed/, "%{__sed}"); | |
1327 | gsub(/%__cat/, "cat"); | |
1328 | gsub(/%__chmod/, "chmod"); | |
32d93636 | 1329 | |
58ca7d6b | 1330 | gsub("/usr/src/linux", "%{_kernelsrcdir}") |
1331 | gsub("%{_prefix}/src/linux", "%{_kernelsrcdir}") | |
a3c6bbce ER |
1332 | |
1333 | if (/^ant /) { | |
1334 | sub(/^ant/, "%ant") | |
42cd9911 ER |
1335 | add_br("BuildRequires: jpackage-utils"); |
1336 | add_br("BuildRequires: rpmbuild(macros) >= 1.300"); | |
1337 | } | |
a3c6bbce | 1338 | |
b6979c9c | 1339 | } |
d2bcf054 | 1340 | |
807cdd98 ER |
1341 | function format_configure(line, n, a, s) { |
1342 | n = split(line, a, / /); | |
1343 | s = a[1] " \\\n"; | |
1344 | for (i = 2; i <= n; i++) { | |
1345 | s = s "\t" a[i] " \\\n" | |
1346 | } | |
1347 | return s | |
1348 | } | |
1349 | ||
c490069b ER |
1350 | |
1351 | # insertion sort of A[1..n] | |
1352 | # copied from mawk manual | |
1353 | function isort(A,n, i,j,hold) { | |
1354 | for (i = 2; i <= n; i++) { | |
1355 | hold = A[j = i] | |
1356 | while (A[j-1] > hold) { | |
e8e4542f | 1357 | j-- ; A[j+1] = A[j] |
1358 | } | |
c490069b ER |
1359 | A[j] = hold |
1360 | } | |
1361 | # sentinel A[0] = "" will be created if needed | |
1362 | } | |
1363 | ||
1364 | ||
1365 | function use_files_macros( i, n, t, a) | |
0bbcf6b4 | 1366 | { |
6702f869 ER |
1367 | use_macros() |
1368 | ||
2a10aeb5 ER |
1369 | # skip comments |
1370 | if (/^#/) { | |
1371 | return; | |
1372 | } | |
1373 | ||
3210b282 ER |
1374 | sub("^%doc %{_mandir}", "%{_mandir}") |
1375 | ||
0bbcf6b4 | 1376 | gsub("^%{_sbindir}", "%attr(755,root,root) %{_sbindir}") |
1377 | gsub("^%{_bindir}", "%attr(755,root,root) %{_bindir}") | |
c490069b | 1378 | |
bb7ad876 ER |
1379 | # uid/gid nobody is not valid in %files |
1380 | if (/%attr([^)]*nobody[^)]*)/ && !/FIXME/) { | |
1381 | $0 = $0 " # FIXME nobody user/group can't own files! -adapter.awk" | |
1382 | } | |
1383 | ||
07aced3a JB |
1384 | # s[gu]id programs with globs are evil |
1385 | if (/%attr\([246]...,.*\*/ && !/FIXME/) { | |
1386 | $0 = $0 " # FIXME no globs for suid/sgid files" | |
ca68f0c3 ER |
1387 | } |
1388 | ||
aedb74de | 1389 | # replace back |
16590ec6 | 1390 | gsub("%{_sysconfdir}/cron\.d", "/etc/cron.d") |
d7018013 | 1391 | gsub("%{_sysconfdir}/crontab\.d", "/etc/crontab.d") |
16590ec6 ER |
1392 | gsub("%{_sysconfdir}/logrotate\.d", "/etc/logrotate.d") |
1393 | gsub("%{_sysconfdir}/pam\.d", "/etc/pam.d") | |
1394 | gsub("%{_sysconfdir}/profile\.d", "/etc/profile.d") | |
1395 | gsub("%{_sysconfdir}/rc\.d", "/etc/rc.d") | |
1396 | gsub("%{_sysconfdir}/security", "/etc/security") | |
1397 | gsub("%{_sysconfdir}/skel", "/etc/skel") | |
1398 | gsub("%{_sysconfdir}/sysconfig", "/etc/sysconfig") | |
1399 | gsub("%{_sysconfdir}/certs", "/etc/certs") | |
aedb74de | 1400 | gsub("%{_sysconfdir}/init.d", "/etc/init.d") |
fc100b2c | 1401 | |
aedb74de ER |
1402 | # /etc/init.d -> /etc/rc.d/init.d |
1403 | if (!/^\/etc\/init\.d$/) { | |
1404 | gsub("/etc/init.d", "/etc/rc.d/init.d") | |
1405 | } | |
1406 | ||
1407 | if (/\/etc\/rc\.d\/init\.d\// && !/functions/) { | |
fc100b2c ER |
1408 | if (!/%attr.*\/etc\/rc\.d\/init\.d/) { |
1409 | $0 = "%attr(754,root,root) " $0 | |
1410 | } | |
1411 | if (/^%attr.*\/etc\/rc\.d\/init\.d/ && !/^%attr\(754 *,/) { | |
a5e4249b | 1412 | gsub("^%attr\\(... *,", "%attr(754,"); |
fc100b2c | 1413 | } |
eeb15f12 ER |
1414 | } |
1415 | ||
17bd16f3 | 1416 | if (/lib.+\.so/ && !/\.so$/ && !/^%attr.*/ && !/%exclude/) { |
d749eebf ER |
1417 | $0 = "%attr(755,root,root) " $0 |
1418 | } | |
1419 | ||
46e31fbb ER |
1420 | if (/%{perl_vendorarch}.*\.so$/ && !/^%attr.*/) { |
1421 | $0 = "%attr(755,root,root) " $0 | |
1422 | } | |
1423 | ||
f12fb504 ER |
1424 | # /etc/sysconfig files |
1425 | # %attr(640,root,root) %config(noreplace) %verify(not size mtime md5) /etc/sysconfig/* | |
feb42f71 | 1426 | # attr not required, allow default 644 attr |
646a62fc | 1427 | if (!/network-scripts/ && !/%dir/ && !/\.d$/ && !/functions/ && !/\/etc\/sysconfig\/wmstyle/) { |
9f60b463 | 1428 | if (/\/etc\/sysconfig\// && /%config/ && !/%config\(noreplace/) { |
aedb74de ER |
1429 | gsub("%config", "%config(noreplace)") |
1430 | } | |
f12fb504 | 1431 | |
9f60b463 | 1432 | if (/\/etc\/sysconfig\// && !/%config\(noreplace/) { |
aedb74de ER |
1433 | $NF = "%config(noreplace) " $NF |
1434 | } | |
f12fb504 | 1435 | |
aedb74de | 1436 | if (/\/etc\/sysconfig\// && /%attr\(755/) { |
a5e4249b | 1437 | gsub("^%attr\\(... *,", "%attr(640,"); |
aedb74de | 1438 | } |
f12fb504 | 1439 | |
aedb74de ER |
1440 | if (/\/etc\/sysconfig\// && !/%verify/) { |
1441 | gsub("/etc/sysconfig", "%verify(not size mtime md5) /etc/sysconfig"); | |
1442 | } | |
feb42f71 ER |
1443 | } |
1444 | ||
f12fb504 | 1445 | # kill leading zeros |
6ac67f5b ER |
1446 | if (/%attr\(0[1-9]/) { |
1447 | gsub("%attr\\(0", "%attr(") | |
1448 | } | |
7dd00833 | 1449 | |
42cd9911 ER |
1450 | # kill default attrs |
1451 | gsub(/%dir %attr\(755,root,root\)/, "%dir"); | |
1452 | gsub(/%attr\(755,root,root\) %dir/, "%dir"); | |
1453 | if (!/%dir/) { | |
1454 | gsub(/%attr\(644,root,root\) /, ""); | |
1455 | } | |
68618e24 | 1456 | |
c490069b | 1457 | # sort %verify attrs |
91e497a5 | 1458 | if (match($0, /%verify\(not([^)]+)\)/)) { |
c490069b | 1459 | t = substr($0, RSTART, RLENGTH) |
f51e180c ER |
1460 | # kill commas: %verify(not,md5,size,mtime) |
1461 | gsub(/,/, " ", t); | |
1462 | ||
c490069b ER |
1463 | gsub(/^%verify\(not |\)$/, "", t) |
1464 | n = split(t, a, / /) | |
1465 | isort(a, n) | |
1466 | ||
1467 | s = "%verify(not" | |
1468 | for (i = 1 ; i <= n; i++) { | |
1469 | s = s " " a[i] | |
1470 | } | |
1471 | s = s ")" | |
1472 | ||
91e497a5 | 1473 | gsub(/%verify\(not[^)]+\)/, s) |
c490069b | 1474 | } |
35a7a211 ER |
1475 | |
1476 | if (/%{_mandir}/) { | |
1dfac985 | 1477 | gsub("\.gz$", "*") |
35a7a211 | 1478 | } |
023aea7a | 1479 | |
5b33a6a1 | 1480 | # locale dir and no %lang -> bad |
d8a3c08f | 1481 | if (/%{_datadir}\/locale\/.*\// && !/%(dir|lang)/) { |
5b33a6a1 ER |
1482 | $(NF + 1) = "# FIXME consider using %find_lang" |
1483 | } | |
1484 | ||
023aea7a ER |
1485 | # atrpms |
1486 | $0 = fixedsub("%{perl_man1dir}", "%{_mandir}/man1", $0); | |
1487 | $0 = fixedsub("%{perl_man3dir}", "%{_mandir}/man3", $0); | |
1488 | $0 = fixedsub("%{perl_bin}", "%{_bindir}", $0); | |
c0ae0d40 ER |
1489 | |
1490 | gsub(libdir "/pkgconfig", "%{_pkgconfigdir}"); | |
1491 | gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}"); | |
1492 | gsub("%{_prefix}/lib/pkgconfig", "%{_pkgconfigdir}"); | |
a83ba4f8 ER |
1493 | |
1494 | gsub("%{_datadir}/applications", "%{_desktopdir}"); | |
195fd300 | 1495 | gsub("%{_datadir}/icons", "%{_iconsdir}"); |
6190dc2e | 1496 | gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}"); |
0bbcf6b4 | 1497 | } |
73e1a9a3 | 1498 | |
afca35ce ER |
1499 | function use_script_macros() |
1500 | { | |
1501 | if (gsub("/sbin/service", "%service")) { | |
1502 | sub(" >/dev/null 2>&1 \|\|:", ""); | |
1503 | sub(" 2> /dev/null \|\| :", ""); | |
1504 | } | |
1505 | } | |
1506 | ||
73e1a9a3 | 1507 | function fill(ch, n, i) { |
1508 | for (i = 0; i < n; i++) | |
1509 | printf("%c", ch) | |
1510 | } | |
1511 | ||
1512 | function format_flush(line, indent, newline, word, first_word) { | |
1513 | first_word = 1 | |
d2bcf054 | 1514 | if (format_indent == -1) |
73e1a9a3 | 1515 | newline = "" |
1516 | else | |
1517 | newline = fill(" ", format_indent) "- " | |
1518 | ||
1519 | while (match(line, /[^\t ]+/)) { | |
1520 | word = substr(line, RSTART, RLENGTH) | |
1521 | if (length(newline) + length(word) + 1 > tw) { | |
1522 | print newline | |
d2bcf054 | 1523 | |
73e1a9a3 | 1524 | if (format_indent == -1) |
1525 | newline = "" | |
1526 | else | |
1527 | newline = fill(" ", format_indent + 2) | |
1528 | first_word = 1 | |
1529 | } | |
1530 | ||
1531 | if (first_word) { | |
1532 | newline = newline word | |
1533 | first_word = 0 | |
1534 | } else | |
1535 | newline = newline " " word | |
d2bcf054 | 1536 | |
73e1a9a3 | 1537 | line = substr(line, RSTART + RLENGTH) |
1538 | } | |
1539 | if (newline ~ /[^\t ]/) { | |
1540 | print newline | |
1541 | } | |
1542 | } | |
1543 | ||
0972e97d | 1544 | function cflags(var) |
1545 | { | |
2f46ef70 | 1546 | if ($0 == var "=\"$RPM_OPT_FLAGS\"") { |
1547 | removed[var] = 1 | |
0972e97d | 1548 | return 0 |
2f46ef70 | 1549 | } |
d2bcf054 | 1550 | |
337741dd | 1551 | if (!/!\?debug/) |
fe9a6f09 | 1552 | sub("\$RPM_OPT_FLAGS", "%{rpmcflags}") |
0972e97d | 1553 | return 1 |
1554 | } | |
0311af17 | 1555 | |
a5ab7844 ER |
1556 | function demacroize(str) |
1557 | { | |
73eaf7b6 ER |
1558 | if (mod_name) { |
1559 | sub("%{mod_name}", mod_name, str); | |
1560 | } | |
1561 | if (name) { | |
1562 | sub("%{name}", name, str); | |
1563 | } | |
a5ab7844 ER |
1564 | if (version) { |
1565 | sub("%{version}", version, str); | |
1566 | } | |
1567 | if (_beta) { | |
1568 | sub("%{_beta}", _beta, str); | |
1569 | } | |
1570 | if (_rc) { | |
1571 | sub("%{_rc}", _rc, str); | |
1572 | } | |
f8281d0c ER |
1573 | if (_pre) { |
1574 | sub("%{_pre}", _pre, str); | |
1575 | } | |
a5ab7844 ER |
1576 | if (_snap) { |
1577 | sub("%{_snap}", _snap, str); | |
1578 | } | |
1579 | return str; | |
1580 | } | |
1581 | ||
0311af17 ER |
1582 | function kill_preamble_macros() |
1583 | { | |
1584 | if ($1 ~ /^URL:/ || $1 ~ /^Obsoletes:/) { | |
73eaf7b6 | 1585 | # NB! assigning $2 a value breaks tabbing |
a5ab7844 | 1586 | $2 = demacroize($2); |
3685f69f ER |
1587 | # unify sourceforge url |
1588 | sub("\.sf\.net/$", ".sourceforge.net/", $2); | |
0311af17 ER |
1589 | } |
1590 | } | |
9911efc1 | 1591 | |
18cdb713 ER |
1592 | function get_epoch(pkg, ver, epoch) |
1593 | { | |
2a50ce70 ER |
1594 | return |
1595 | # should parse the BR lines more adequately: | |
1596 | # freetype = 2.0.0 -> correct | |
1597 | # freetype = 2.1.9 -> with epoch 1, as epoch 1 was added in 2.1.7 | |
1598 | ||
18cdb713 ER |
1599 | shell = "grep -o '^" pkg ":[^:]\+' ../PLD-doc/BuildRequires.txt | awk '{print $NF}'"; |
1600 | shell | getline epoch; | |
1601 | return epoch; | |
1602 | } | |
1603 | ||
9911efc1 | 1604 | function format_requires(tag, value, n, p, i, deps, ndeps) { |
83c487a0 ER |
1605 | # skip any formatting for commented out items or some weird macros |
1606 | if (/^#/ || /%\(/) { | |
f3b115ea ER |
1607 | return tag "\t" value |
1608 | } | |
9911efc1 ER |
1609 | n = split(value, p, / *,? */); |
1610 | for (i = 1; i <= n; i++) { | |
1611 | if (p[i+1] ~ /[<=>]/) { | |
18cdb713 ER |
1612 | # add epoch if the version doesn't have it but BuildRequires.txt has |
1613 | if (p[i] ~ /^[a-z]/ && p[i+2] !~ /^[0-9]+:/) { | |
1614 | epoch = get_epoch(p[i], p[i+2]) | |
1615 | if (epoch) { | |
1616 | p[i+2] = epoch ":" p[i+2]; | |
1617 | } | |
1618 | } | |
9911efc1 ER |
1619 | deps[ndeps++] = p[i] " " p[i+1] " " p[i+2]; |
1620 | i += 2; | |
1621 | } else { | |
1622 | deps[ndeps++] = p[i]; | |
1623 | } | |
1624 | } | |
1625 | s = "" | |
1626 | for (i in deps) { | |
1627 | s = s sprintf("%s\t%s\n", tag, deps[i]); | |
1628 | } | |
1629 | return substr(s, 1, length(s)-1); | |
1630 | } | |
035bfa01 ER |
1631 | |
1632 | function use_tabs() | |
1633 | { | |
1634 | # reverse vim: ts=4 sw=4 et | |
1635 | gsub(/ /, "\t"); | |
1636 | } | |
a3c6bbce ER |
1637 | |
1638 | function add_br(br) | |
1639 | { | |
42cd9911 | 1640 | BR[BR_count++] = br |
a3c6bbce ER |
1641 | } |
1642 | ||
cdf38256 ER |
1643 | # php virtual deps as discussed in devel-en |
1644 | function replace_php_virtual_deps() | |
1645 | { | |
42cd9911 ER |
1646 | pkg = $2 |
1647 | # if (pkg == "php-program") { | |
1648 | # $0 = $1 "\t/usr/bin/php" | |
1649 | # return | |
1650 | # } | |
1651 | ||
1652 | if (pkg ~ /^php-[a-z]/ && pkg !~ /^php-(pear|common|cli|devel|fcgi|cgi|dirs|program|pecl-)/) { | |
1653 | sub(/^php-/, "php(", pkg); | |
1654 | sub(/$/, ")", pkg); | |
1655 | $2 = pkg | |
1656 | } | |
1657 | ||
1658 | if (pkg ~/^php$/) { | |
1659 | $2 = "webserver(php)"; | |
1660 | if ($4 ~ /^[0-9]:/) { | |
1661 | $4 = substr($4, 3); | |
1662 | } | |
1663 | } | |
1664 | ||
1665 | if (pkg ~/^php4$/) { | |
1666 | $2 = "webserver(php)"; | |
1667 | if ($4 ~ /^[0-9]:/) { | |
1668 | $4 = substr($4, 3); | |
1669 | } | |
1670 | } | |
cdf38256 ER |
1671 | } |
1672 | ||
13dda4dc | 1673 | # vim:ts=4:sw=4 |