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