]> 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
- pear macros migration
[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
f5f6280a
ER		 239 if ($2 ~ /^_?pearname$/)
240 pearname = $3
d6e33af7
ER		 241 if ($2 ~ /^_class$/)
242 pear_class = $3
243 if ($2 ~ /^_subclass$/)
244 pear_subclass = $3
245
246 # kill the _class and _subclass pear macros
247 if ($2 == "_pearname" || $2 == "pearname") {
248 if (pear_class) {
249 gsub("%{_class}", pear_class, $3);
250 }
251 if (pear_subclass) {
252 gsub("%{_subclass}", pear_subclass, $3);
253 }
254 }
0ea7c3cd 255
78d96561 256 sub(/[ \t]+$/, "");
a39ddef5
ER		 257 # do nothing further, otherwise adapter thinks we're at preamble
258 print
259 next
1da27823
SZ		 260}
261
6c67f9b1
ER		 262# Obsolete
263/^%include.*\/usr\/lib\/rpm\/macros\.python$/ {
264 next
265}
266
246ad57e 267################
268# %description #
269################
93e2a87a 270/^%description/, (!/^%description/ && $0 ~ SECTIONS) {
aec1bddb 271 preamble = 0
efe53381 272
3a14bf9d 273 if (/^%description/) {
aec1bddb 274 bod++
236b87ac 275 format_line = ""
276 format_indent = -1
3a14bf9d
SZ		 277 }
278
236b87ac 279 # Format description
7b868d98 280 if (ENVIRON["SKIP_DESC"] != 1 && description == 1 && !/^%[a-z]+/ && !/^%description/) {
3a14bf9d 281 if (/^[ \t]*$/) {
236b87ac 282 format_flush(format_line, format_indent)
3a14bf9d 283 print ""
236b87ac 284 format_line = ""
285 format_indent = -1
3a14bf9d 286 } else if (/^[ \t]*[-\*][ \t]*/) {
236b87ac 287 format_flush(format_line, format_indent)
f171fd40 288 match($0, /^[ \t]*/)
236b87ac 289 format_indent = RLENGTH
290 match($0, /^[ \t]*[-\*][ \t]/)
291 format_line = substr($0, RLENGTH)
f171fd40 292 } else
236b87ac 293 format_line = format_line " " $0
aec1bddb 294 next
efe53381 295 }
f171fd40 296
1da27823 297 if (/^%[a-z]+/ && (!/^%description/ || bod == 2)) {
ddb18dd4 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 }
236b87ac 304 format_flush(format_line, format_indent)
efe53381 305 if (bod == 2) {
aec1bddb
SZ		 306 bod = 1
307 description = 1
efe53381 308 } else {
aec1bddb
SZ		 309 bod = 0
310 description = 0
efe53381 311 }
312 } else
aec1bddb 313 description = 1
bf0a58ea 314}
315
246ad57e 316#########
317# %prep #
318#########
93e2a87a 319/^%prep/, (!/^%prep/ && $0 ~ SECTIONS) {
aec1bddb 320 preamble = 0
4ab1678b 321 did_prep = 1
f171fd40 322
ac779c71
ER		 323 use_macros()
324
43c05c3c 325 # Add '-q' to %setup
e780ff0a 326 if (/^%setup/ && !/-q/) {
1da27823 327 sub(/^%setup/, "%setup -q")
e780ff0a
ER		 328 }
329
af38fe16 330 if (/^%setup/ && name != "setup") {
e9097b46
ER		 331 $0 = fixedsub(name, "%{name}", $0);
332 $0 = fixedsub(version, "%{version}", $0);
4a8d9a70 333 if (_beta) {
e9097b46 334 $0 = fixedsub(_beta, "%{_beta}", $0);
4a8d9a70
ER		 335 }
336 if (_rc) {
e9097b46 337 $0 = fixedsub(_rc, "%{_rc}", $0);
4a8d9a70 338 }
59de1799
ER		 339 if (_pre) {
340 $0 = fixedsub(_pre, "%{_pre}", $0);
341 }
4a8d9a70 342 if (_snap) {
e9097b46 343 $0 = fixedsub(_snap, "%{_snap}", $0);
4a8d9a70 344 }
3c5e6e5f
ER		 345 if (subver) {
346 $0 = fixedsub(subver, "%{subver}", $0);
347 }
4f822e22
ER		 348 }
349
10690436 350 if (/^%setup/ && /-n %{name}-%{version}( |$)/) {
e9097b46 351 $0 = fixedsub(" -n %{name}-%{version}", "", $0)
e780ff0a 352 }
b6875e34 353 sub("^%patch ", "%patch0 ");
ac779c71
ER		 354
355 # invalid in %prep
356 sub("^rm -rf \$RPM_BUILD_ROOT.*", "");
bf0a58ea 357}
358
246ad57e 359##########
360# %build #
361##########
93e2a87a 362/^%build/, (!/^%build/ && $0 ~ SECTIONS) {
aec1bddb 363 preamble = 0
bf0a58ea 364
4ab1678b
ER		 365 if (did_prep == 0) {
366 print "%prep"
367 print ""
368 did_prep = 1
369 }
370
aec1bddb 371 use_macros()
6ebff802 372 use_tabs()
f171fd40 373
9cb72c72 374 if (/^automake$/)
375 sub(/$/, " -a -c")
376
eb4bf70e 377 if (/LDFLAGS/) {
85e708f2 378 if (/LDFLAGS="-s"/) {
379 removed["LDFLAGS"] = 1
380 next
381 } else {
382 split($0, tmp, "LDFLAGS=")
eb4bf70e 383 count = split(tmp[2], flags, "\"")
85e708f2 384 if (flags[1] != "" && flags[1] !~ "!?debug") {
fde8f52a 385 sub(/-s[" ]?/, "%{rpmldflags} ", flags[1])
85e708f2 386 $0 = tmp[1] line[1] "LDFLAGS=" flags[1] "\""
387 for (i = 2; i < count; i++)
388 $0 = $0 flags[i] "\""
389 }
eb4bf70e 390 }
391 }
392
393 if (/CFLAGS=/)
394 if (cflags("CFLAGS") == 0)
395 next
396
397 if (/CXXFLAGS=/)
398 if (cflags("CXXFLAGS") == 0)
399 next
f171fd40 400
85e708f2 401 if (/^export /) {
402 if (removed["LDFLAGS"])
403 sub(" LDFLAGS", "")
404 if (removed["CFLAGS"])
405 sub(" CFLAGS", "")
406 if (removed["CXXFLAGS"])
407 sub(" CXXFLAGS", "")
408 # Is there still something?
409 if (/^export[ ]*$/)
410 next
411 }
2d74be7e 412
db9b1bf2 413 # quote CC
2d74be7e
ER		 414 if (/CC=%{__cc} /) {
415 sub("CC=%{__cc}", "CC=\"%{__cc}\"")
416 }
b34b8660 417
e6f1551d 418 # use PLD Linux macros
b34b8660
ER		 419 $0 = fixedsub("glib-gettextize --copy --force","%{__glib_gettextize}", $0);
420 $0 = fixedsub("intltoolize --copy --force", "%{__intltoolize}", $0);
db9b1bf2 421 $0 = fixedsub("automake --add-missing --copy", "%{__automake}", $0);
56699a32 422 $0 = fixedsub("automake -a --foreign --copy", "%{__automake}", $0);
4e26c5f2 423 $0 = fixedsub("automake -a -c --foreign", "%{__automake}", $0);
ebeed758 424 $0 = fixedsub("automake -a -c", "%{__automake}", $0);
56699a32
ER		 425 $0 = fixedsub("libtoolize --force --automake --copy", "%{__libtoolize}", $0);
426 $0 = fixedsub("libtoolize -c -f --automake", "%{__libtoolize}", $0);
db9b1bf2
ER		 427
428 sub(/^aclocal$/, "%{__aclocal}");
429 sub(/^autoheader$/, "%{__autoheader}");
430 sub(/^autoconf$/, "%{__autoconf}");
431 sub(/^automake$/, "%{__automake}");
ebeed758 432 sub(/^libtoolize$/, "%{__libtoolize}");
f171fd40 433
5e15e952
ER		 434 # atrpms
435 $0 = fixedsub("%perl_configure", "%{__perl} Makefile.PL \\\n\tINSTALLDIRS=vendor", $0);
436 $0 = fixedsub("%perl_makecheck", "%{?with_tests:%{__make} test}", $0);
377e5b9e
ER		 437
438 # alt linux
439 $0 = fixedsub("%make_build", "%{__make}", $0);
bf0a58ea 440}
441
246ad57e 442##########
443# %clean #
444##########
93e2a87a 445/^%clean/, (!/^%clean/ && $0 ~ SECTIONS) {
1c52b18e 446 did_clean = 1
e6f1551d 447
b6875e34 448 use_macros()
1c52b18e
SZ		 449}
450
246ad57e 451############
452# %install #
453############
93e2a87a 454/^%install/, (!/^%install/ && $0 ~ SECTIONS) {
f171fd40 455
aec1bddb 456 preamble = 0
f171fd40 457
ec0082cc 458 # foreign rpms
624df313 459 sub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT")
b6875e34
ER		 460 sub("%buildroot", "$RPM_BUILD_ROOT");
461 sub("%{buildroot}", "$RPM_BUILD_ROOT");
ec0082cc 462
624df313 463 if (/^[ \t]*rm([ \t]+-[rf]+)*[ \t]+(\${?RPM_BUILD_ROOT}?|%{?buildroot}?)/ && did_rmroot==0) {
1c52b18e 464 did_rmroot=1
dda3eaa5
SZ		 465 print "rm -rf $RPM_BUILD_ROOT"
466 next
467 }
43c05c3c 468
1c52b18e 469 if (!/^(#?[ \t]*)$/ && !/^%install/ && did_rmroot==0) {
dda3eaa5 470 print "rm -rf $RPM_BUILD_ROOT"
1c52b18e 471 did_rmroot=1
dda3eaa5 472 }
f171fd40 473
b6875e34
ER		 474 if (tmpdir) {
475 buildroot = tmpdir "/" name "-" version "-root-" ENVIRON["USER"]
3d8be7c3 476 gsub(buildroot, "$RPM_BUILD_ROOT")
b6875e34 477 }
3d8be7c3 478
b6875e34
ER		 479 if (!/%{_lib}/) {
480 sub("\$RPM_BUILD_ROOT/%", "$RPM_BUILD_ROOT%")
481 }
259883bf 482
dda3eaa5 483 use_macros()
f171fd40 484
bf0a58ea 485 # 'install -d' instead 'mkdir -p'
486 if (/mkdir -p/)
aec1bddb 487 sub(/mkdir -p/, "install -d")
fde90d94 488
48409aee 489 # cp -a already implies cp -r
b6875e34 490 sub(/^cp -ar/, "cp -a")
f171fd40 491
43c05c3c 492 # No '-u root' or '-g root' for 'install'
681a4871 493 if (/^install/ && /-[ug][ \t]*root/)
aec1bddb 494 gsub(/-[ug][ \t]*root /, "")
f171fd40 495
2016aa83
ER		 496 if (/^install/ && /-m[ \t]*[0-9]+/)
497 gsub(/-m[ \t]*[0-9]+ /, "")
f171fd40 498
f1991554 499 # No lines contain 'chown' or 'chgrp' if owner/group is 'root'
43c05c3c 500 if (($1 ~ /chown/ && $2 ~ /root\.root/) || ($1 ~ /chgrp/ && $2 ~ /root/))
aec1bddb 501 next
f171fd40 502
43c05c3c 503 # No lines contain 'chmod' if it sets the modes to '644'
681a4871 504 if ($1 ~ /chmod/ && $2 ~ /644/)
aec1bddb 505 next
5e15e952 506
5e15e952
ER		 507 # atrpms
508 $0 = fixedsub("%perl_makeinstall", "%{__make} pure_install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0);
377e5b9e
ER		 509
510 # alt linux
511 $0 = fixedsub("%make_install DESTDIR=$RPM_BUILD_ROOT install", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0);
bf0a58ea 512}
513
246ad57e 514##########
515# %files #
516##########
93e2a87a 517/^%files/, (!/^%files/ && $0 ~ SECTIONS) {
aec1bddb 518 preamble = 0
4ab1678b 519 did_files = 1
f171fd40 520
1da27823 521 if ($0 ~ /^%files/)
aec1bddb 522 defattr = 1
f171fd40 523
484bbf6d
ER		 524 if (!use_files_macros()) {
525 next
526 }
bf0a58ea 527}
528
246ad57e 529##############
530# %changelog #
531##############
93e2a87a 532/^%changelog/, (!/^%changelog/ && $0 ~ SECTIONS) {
aec1bddb 533 preamble = 0
dda3eaa5 534 has_changelog = 1
97e21521 535 skip = 0
bf0a58ea 536 # There should be some CVS keywords on the first line of %changelog.
97e21521 537 if (boc == 3) {
4b7a9b6b 538 if ($0 !~ _cvsmailfeedback) {
f6f0c932 539 print "* %{date} " _cvsmailfeedback > changelog_file
4b7a9b6b 540 } else {
97e21521 541 skip = 1
4b7a9b6b 542 }
97e21521 543 boc = 2
d31b8a48 544 }
97e21521 545 if (boc == 2 && !skip) {
d31b8a48 546 if (!/All persons listed below/) {
fd5e70be 547 printf "All persons listed below can be reached at " > changelog_file
f6f0c932 548 print "<cvs_login>" _cvsmaildomain "\n" > changelog_file
4b7a9b6b 549 } else {
97e21521 550 skip = 1
4b7a9b6b 551 }
44379e57 552 boc = 1
bf0a58ea 553 }
97e21521
JB		 554 if (boc == 1 && !skip) {
555 if (!/^$/) {
4b7a9b6b 556 if (!/\$.*Log:.*\$/) {
97e21521 557 print "$" "Log:$" > changelog_file
4b7a9b6b 558 }
97e21521
JB		 559 boc = 0
560 }
d31b8a48 561 }
3fdddc43 562 # Define date macro.
d31b8a48 563 if (boc == 4) {
a1aa4976 564 if (date == 0) {
5c18171e 565 printf "%%define date\t%%(echo `LC_ALL=\"C\"" > changelog_file
566 print " date +\"%a %b %d %Y\"`)" > changelog_file
1395ea1c 567 date = 1
a1aa4976 568 }
d31b8a48 569 boc = 3
3fdddc43 570 }
5c18171e 571
4b7a9b6b
ER		 572 sub(/[ \t]+$/, "");
573 if (!/^%[a-z]+$/ || /changelog/) {
574 # stop changelog if "real" changelog starts
575 if (boc == 0 && /^\* /) {
576 boc = -1
577 }
578 if (boc == -1) {
579 next;
580 }
5c18171e 581 print > changelog_file
4b7a9b6b 582 } else {
5c18171e 583 print
4b7a9b6b 584 }
5c18171e 585 next
bf0a58ea 586}
587
246ad57e 588###########
589# SCRIPTS #
590###########
93e2a87a 591/^%pre/, (!/^%pre/ && $0 ~ SECTIONS) {
246ad57e 592 preamble = 0
e9176470 593
723ce732
ER		 594 if (gsub("/usr/sbin/useradd", "%useradd")) {
595 sub(" 2> /dev/null \|\| :", "");
596 sub(" >/dev/null 2>&1 \|\|:", "");
597 }
598
e9176470
ER		 599 # %useradd and %groupadd may not be wrapped
600 if (/%(useradd|groupadd).*\\$/) {
601 a = $0; getline;
602 sub(/^[\s\t]*/, "");
603 $0 = substr(a, 1, length(a) - 1) $0;
604 }
723ce732 605 use_script_macros()
246ad57e 606}
e9176470 607
93e2a87a 608/^%post/, (!/^%post/ && $0 ~ SECTIONS) {
246ad57e 609 preamble = 0
c2b069de 610 use_macros()
246ad57e 611}
93e2a87a 612/^%preun/, (!/^%preun/ && $0 ~ SECTIONS) {
246ad57e 613 preamble = 0
d11acde9 614 use_macros()
246ad57e 615}
93e2a87a 616/^%postun/, (!/^%postun/ && $0 ~ SECTIONS) {
246ad57e 617 preamble = 0
723ce732 618 use_script_macros()
246ad57e 619}
93e2a87a 620/^%triggerin/, (!/^%triggerin/ && $0 ~ SECTIONS) {
bdba3986 621 preamble = 0
723ce732 622 use_script_macros()
bdba3986 623}
93e2a87a 624/^%triggerun/, (!/^%triggerun/ && $0 ~ SECTIONS) {
bdba3986 625 preamble = 0
723ce732 626 use_script_macros()
bdba3986 627}
93e2a87a 628/^%triggerpostun/, (!/^%triggerpostun/ && $0 ~ SECTIONS) {
bdba3986 629 preamble = 0
723ce732 630 use_script_macros()
bdba3986 631}
93e2a87a 632/^%pretrans/, (!/^%pretrans/ && $0 ~ SECTIONS) {
bdba3986 633 preamble = 0
723ce732 634 use_script_macros()
bdba3986 635}
93e2a87a 636/^%posttrans/, (!/^%posttrans/ && $0 ~ SECTIONS) {
bdba3986 637 preamble = 0
723ce732 638 use_script_macros()
bdba3986 639}
0ae11f54
ER		 640/^%verifyscript/, (!/^%verifyscript/ && $0 ~ SECTIONS) {
641 preamble = 0
723ce732 642 use_script_macros()
0ae11f54
ER		 643}
644/^%check/, (!/^%check/ && $0 ~ SECTIONS) {
645 preamble = 0
723ce732 646 use_script_macros()
0ae11f54 647}
246ad57e 648
649#############
650# PREAMBLES #
651#############
bf0a58ea 652preamble == 1 {
681a4871 653 # There should not be a space after the name of field
654 # and before the colon.
aec1bddb 655 sub(/[ \t]*:/, ":")
f171fd40 656
1462d6a3
ER		 657 if (/^%perl_module_wo_prefix/) {
658 name = $2
659 version = $3
660 release = "0." fixedsub(".%{disttag}.at", "", $4)
661 }
662
aec1bddb 663 field = tolower($1)
38cb34ef 664 if (field ~ /summary:/ && !/etc\.$/ && !/Inc\.$/) {
024709c6
ER		 665 sub(/\.$/, "", $0);
666 }
f37c1259 667 if (field ~ /group(\([^)]+\)):/)
1a5b27d5 668 next
f37c1259 669 if (field ~ /group:/) {
670 format_preamble()
d9e2bd9b
ER		 671 group = $0;
672 sub(/^[^ \t]*[ \t]*/, "", group);
ad9ea417 673 group = replace_groupnames(group);
d9e2bd9b
ER		 674 $0 = "Group:\t\t" group
675
676 if (group ~ /^X11/ && x11 == 0) # Is it X11 application?
7a72f436 677 x11 = 1
8e5358f8 678
d9e2bd9b 679 byl_plik_z_groupmi = 0
8e5358f8
SZ		 680 byl_opis_grupy = 0
681 while ((getline linia_grup < groups_file) > 0) {
d9e2bd9b
ER		 682 byl_plik_z_groupmi = 1
683 if (linia_grup == group) {
8e5358f8
SZ		 684 byl_opis_grupy = 1
685 break
686 }
687 }
69501a12 688
d9e2bd9b 689 if (!byl_plik_z_groupmi)
8e5358f8
SZ		 690 print "######\t\t" groups_file ": no such file"
691 else if (!byl_opis_grupy)
692 print "######\t\t" "Unknown group!"
f171fd40 693
8e5358f8 694 close(groups_file)
4ab1678b 695 did_groups = 1
8e5358f8 696 }
f171fd40 697
307f5229 698 if (field ~ /prereq:/) {
a68f7b3b 699 sub(/Pre[Rr]eq:/, "Requires:", $1);
307f5229
ER		 700 }
701
4aa6db15 702 # split (build)requires, obsoletes on commas
21a50087 703 if (field ~ /(obsoletes|requires|provides|conflicts|suggests):/ && NF > 2) {
ba377afe
ER		 704 value = substr($0, index($0, $2));
705 $0 = format_requires($1, value);
f12ab15d 706 }
b6875e34 707
8e734165
ER		 708 # BR: tar (and others) is to common (rpm-build requires it)
709 if (field ~ /^buildrequires:/) {
eb028bca
ER		 710 l = substr($0, index($0, $2));
711 if (l == "awk" ||
712 l == "binutils" ||
713 l == "bzip2" ||
714 l == "cpio" ||
715 l == "diffutils" ||
716 l == "elfutils" ||
717 l == "fileutils" ||
718 l == "findutils" ||
719 l == "glibc-devel" ||
720 l == "grep" ||
721 l == "gzip" ||
722 l == "make" ||
723 l == "patch" ||
724 l == "sed" ||
725 l == "sh-utils" ||
726 l == "tar" ||
727 l == "textutils") {
8e734165
ER		 728 next
729 }
d0297fb3 730
92fa789e 731 replace_requires();
8e734165
ER		 732 }
733
e27788d1 734 if (field ~ /^requires:/ || field ~ /^requires\(/) {
92fa789e 735 replace_requires();
b6875e34 736 }
30cd4686
ER		 737
738
ff21ed9e 739 # obsolete/unwanted tags
32908bc5 740 if (field ~ /vendor:|packager:|distribution:|docdir:|prefix:|icon:|author:|author-email:|metadata-version:/) {
aec1bddb 741 next
ba377afe 742 }
f171fd40 743
4ab1678b 744 if (field ~ /buildroot:/) {
376e6bc4 745 $0 = $1 "%{tmpdir}/%{name}-%{version}-root-%(id -u -n)"
4ab1678b
ER		 746 did_build_root = 1
747 }
681a4871 748
681a4871 749 # Use "License" instead of "Copyright" if it is (L)GPL or BSD
4932d2c6 750 if (field ~ /copyright:/ && $2 ~ /GPL|BSD/) {
aec1bddb 751 $1 = "License:"
4932d2c6 752 }
f171fd40 753
ad2932df
ER		 754 # ease updating from debian .dsc
755 if (field ~ /homepage:/) {
756 $1 = "URL:"
757 }
758
517313c5
ER		 759 # suse
760 if (field ~ /recommends:/) {
761 $1 = "Suggests:"
762 }
763
4defab2b 764 if ($3 == "==" && $1 !~ /%/) {
517313c5
ER		 765 $3 = "="
766 }
767
3b07e07f
ER		 768 if (field ~ /license:/) {
769 l = substr($0, index($0, $2));
770 if (l == "Python Software Foundation License") {
771 l = "PSF"
772 }
6112ae02
ER		 773 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") {
774 l = "Apache v2.0"
775 }
776 if (l == "Apache Group License" || l == "Apache Software License" || l == "Apache License") {
777 l = "Apache"
778 }
779 if (l == "Apache-style License" || l == "Apache-style Software License") {
780 l = "Apache-like"
781 }
782 if (l == "Apache Software License 1.1" || l == "Apache 1.1") {
783 l = "Apache v1.1"
784 }
ee9487af
ER		 785 if (l == "GPLv2") {
786 l = "GPL v2"
787 }
788 if (l == "GPLv2+") {
789 l = "GPL v2+"
790 }
407e19de
ER		 791 if (l == "GPL v2 or later") {
792 l = "GPL v2+"
793 }
517313c5
ER		 794 if (l == "LGPL v2.0 only") {
795 l = "LGPL v2"
796 }
af8efb29
ER		 797 if (l == "LGPLv2+") {
798 l = "LGPL v2+"
799 }
471a5464
ER		 800 if (l == "GPLv3") {
801 l = "GPL v3"
802 }
803 if (l == "GPLv3+") {
804 l = "GPL v3+"
805 }
e02ad475
ER		 806 if (l == "MPLv1.1") {
807 l = "MPL v1.1"
808 }
3b07e07f
ER		 809 $0 = "License:\t" l;
810 }
811
812
1462d6a3 813 if (field ~ /name:/) {
6426afb8 814 if ($2 == "%{name}" && name) {
63d47bae
ER		 815 $2 = name
816 }
aec1bddb 817 name = $2
1462d6a3
ER		 818 name_seen = 1;
819 }
681a4871 820
1462d6a3 821 if (field ~ /version:/) {
63d47bae
ER		 822 if ($2 == "%{version}" && version) {
823 $2 = version
824 }
aec1bddb 825 version = $2
1462d6a3
ER		 826 version_seen = 1;
827 }
828
829 if (field ~ /release:/) {
63d47bae
ER		 830 if ($2 == "%{release}" && release) {
831 $2 = release
832 }
4ab1678b 833 sub(/%atrelease /, "0.", $0)
1462d6a3
ER		 834 release = $2
835 release_seen = 1;
836 }
681a4871 837
32908bc5 838
c4dde22b
SZ		 839 if (field ~ /serial:/)
840 $1 = "Epoch:"
b6853342 841
32908bc5
ER		 842 if (field ~ /home-page:/)
843 $1 = "URL:"
844
89b1cd55 845 # proper caps
cf038723 846 if (field ~ /^url:$/)
89b1cd55
ER		 847 $1 = "URL:"
848
471a5464
ER		 849 if (field ~ /^patch/)
850 $1 = "Patch" substr(field, 6);
851
32908bc5
ER		 852 if (field ~ /^description:$/)
853 $1 = "\n%description\n"
854
681a4871 855 # Use %{name} and %{version} in the filenames in "Source:"
f4cb1924 856 if (field ~ /^source/ || field ~ /patch/) {
aec1bddb 857 n = split($2, url, /\//)
fd8718a5
SZ		 858 if (url[n] ~ /\.gz$/) {
859 url[n+1] = ".gz" url[n+1]
860 sub(/\.gz$/,"",url[n])
861 }
862 if (url[n] ~ /\.zip$/) {
863 url[n+1] = ".zip" url[n+1]
864 sub(/\.zip$/,"",url[n])
865 }
866 if (url[n] ~ /\.tar$/) {
867 url[n+1] = ".tar" url[n+1]
868 sub(/\.tar$/,"",url[n])
869 }
870 if (url[n] ~ /\.patch$/) {
871 url[n+1] = ".patch" url[n+1]
872 sub(/\.patch$/,"",url[n])
873 }
874 if (url[n] ~ /\.bz2$/) {
875 url[n+1] = ".bz2" url[n+1]
876 sub(/\.bz2$/,"",url[n])
877 }
dac4e142
SZ		 878 if (url[n] ~ /\.logrotate$/) {
879 url[n+1] = ".logrotate" url[n+1]
880 sub(/\.logrotate$/,"",url[n])
881 }
882 if (url[n] ~ /\.pamd$/) {
883 url[n+1] = ".pamd" url[n+1]
884 sub(/\.pamd$/,"",url[n])
885 }
886
a3fcc309 887 # allow %{name} only in last url component
ced0372e
ER		 888 s = ""
889 for (i = 1; i <= n; i++) {
890 url[i] = fixedsub("%{name}", name, url[i])
891 if (s) {
892 s = s "/" url[i]
893 } else {
894 s = url[i]
895 }
896 }
897 $2 = s url[n+1]
898
aec1bddb 899 filename = url[n]
5e028343
ER		 900 if (name) {
901 url[n] = fixedsub(name, "%{name}", url[n])
902 }
755ab9c0 903 if (field ~ /source/) {
5e028343
ER		 904 if (version) {
905 url[n] = fixedsub(version, "%{version}", url[n])
906 }
755ab9c0
ER		 907 if (_beta) {
908 url[n] = fixedsub(_beta, "%{_beta}", url[n])
909 }
910 if (_rc) {
911 url[n] = fixedsub(_rc, "%{_rc}", url[n])
912 }
59de1799
ER		 913 if (_pre) {
914 url[n] = fixedsub(_pre, "%{_pre}", url[n])
915 }
755ab9c0
ER		 916 if (_snap) {
917 url[n] = fixedsub(_snap, "%{_snap}", url[n])
918 }
3c5e6e5f
ER		 919 if (subver) {
920 url[n] = fixedsub(subver, "%{subver}", url[n])
921 }
755ab9c0 922 }
57caba32 923 # assigning to $2 kills preamble formatting
fd8718a5 924 $2 = fixedsub(filename, url[n], $2)
f171fd40 925
8ea8f0ae 926 $2 = unify_url($2)
681a4871 927 }
8b1938ea 928
f171fd40 929
f4cb1924 930 if (field ~ /^source:/)
f171fd40 931 $1 = "Source0:"
aec1bddb 932
13b24a87 933 if (field ~ /^patch:/)
aec1bddb 934 $1 = "Patch0:"
f171fd40 935
0ea7c3cd 936 kill_preamble_macros();
aec1bddb 937 format_preamble()
f171fd40 938
c26ee7ef
ER		 939 if (field ~ /requires/) {
940 # atrpms
941 $0 = fixedsub("%{eversion}", "%{epoch}:%{version}-%{release}", $0);
942 }
bf0a58ea 943}
944
4c1b7426
ER		 945/^%bcond_/ {
946 # do nothing
947 print
948 next
949}
c58d1357
ER		 950
951# sort BR/R!
952#
953# NOTES:
954# - mixing BR/R and anything else confuses this (all will be sorted together)
b6875e34 955# so don't do that.
c58d1357 956# - comments leading the BR/R can not be associated,
b6875e34 957# so don't adapterize when the BR/R are mixed with comments
a6b7c72d 958ENVIRON["SKIP_SORTBR"] != 1 && preamble == 1 && $0 ~ PREAMBLE_TAGS ":", $0 ~ PREAMBLE_TAGS ":"{
57caba32 959 if ($1 ~ /Pre[Rr]eq:/) {
a68f7b3b 960 sub(/Pre[Rr]eq:/, "Requires:", $1);
c58d1357 961 }
23ddcab1
ER		 962 if ($1 == "BR:" ) {
963 $1 = "BuildRequires:"
964 }
965 if ($1 == "R:" ) {
966 $1 = "Requires:"
967 }
c58d1357 968 format_preamble()
8f7c516b 969# kill_preamble_macros(); # breaks tabbing
c58d1357
ER		 970
971 b_idx++;
972 l = substr($0, index($0, $2));
973 b_ktmp = b_makekey($1, l);
974 b_key[b_idx] = b_ktmp;
975 b_val[b_ktmp] = $0;
976
977 next;
978}
979
c58d1357
ER		 980preamble == 1 {
981 if (b_idx > 0) {
982 isort(b_key, b_idx);
983 for (i = 1; i <= b_idx; i++) {
4932d2c6
ER		 984 v = b_val[b_key[i]];
985 sub(/[ \t]+$/, "", v);
986 print "" v;
c58d1357
ER		 987 }
988 b_idx = 0
989 }
990}
991
7a72f436 992# main() ;-)
bf0a58ea 993{
aec1bddb 994 preamble = 1
f171fd40 995
70a1dc9e 996 sub(/[ \t]+$/, "")
aec1bddb 997 print
1462d6a3
ER		 998
999 if (name_seen == 0 && name) {
31702e1e 1000 print "Name:\t\t" name
1462d6a3
ER		 1001 name_seen = 1
1002 }
1003
1004 if (version_seen == 0 && version) {
1005 print "Version:\t" version
1006 version_seen = 1
1007 }
1008
1009 if (release_seen == 0 && release) {
1010 print "Release:\t" release
1011 release_seen = 1
1012 }
32908bc5
ER		 1013
1014 if (did_build_root == 0) {
4ab1678b 1015# print "BuildRoot:\t%{tmpdir}/%{name}-%{version}-root-%(id -u -n)"
32908bc5
ER		 1016 did_build_root = 1
1017 }
4ab1678b
ER		 1018 if (did_groups == 0) {
1019# print "Group:\t\tunknown"
1020 did_groups = 1
1021 }
a1aa4976 1022}
1023
f1991554 1024
a1aa4976 1025END {
a4de4386
ER		 1026 if (do_not_touch_anything) {
1027 exit(rc)
1028 }
f171fd40 1029
b6875e34
ER		 1030 # TODO: need to output these in proper place
1031 if (BR_count > 0) {
1032 for (i = 0; i <= BR_count; i++) {
1033 print BR[i];
1034 }
1035 }
1c955424 1036
f1991554 1037 close(changelog_file)
1038 while ((getline < changelog_file) > 0)
1039 print
1040 system("rm -f " changelog_file)
48c6019c 1041
1c52b18e
SZ		 1042 if (did_clean == 0) {
1043 print ""
1044 print "%clean"
1045 print "rm -rf $RPM_BUILD_ROOT"
1046 }
1047
dda3eaa5
SZ		 1048 if (date == 0) {
1049 print ""
1050 print "%define date\t%(echo `LC_ALL=\"C\" date +\"%a %b %d %Y\"`)"
1051 }
f171fd40 1052
1c955424 1053 if (has_changelog == 0) {
1395ea1c 1054 print "%changelog"
b6875e34 1055 }
dda3eaa5 1056
1c955424 1057 if (boc > 2) {
5bdbef27 1058 print "* %{date} PLD Team <feedback@pld-linux.org>"
b6875e34 1059 }
d31b8a48 1060 if (boc > 1) {
f818cd64 1061 printf "All persons listed below can be reached at "
5bdbef27 1062 print "<cvs_login>@pld-linux.org\n"
a1aa4976 1063 }
1c955424 1064 if (boc > 0) {
d31b8a48 1065 print "$" "Log:$"
b6875e34 1066 }
bf0a58ea 1067}
1068
fd8718a5 1069# substitutes fixed strings (not regexps)
98e37f1f 1070function fixedsub(s1,s2,t, ind) {
7a72f436 1071 if (ind = index(t,s1))
1072 t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1))
1073 return t
fd8718a5
SZ		 1074}
1075
98e37f1f
ER		 1076# replace s with s2 if it equals to s1
1077function replace(s, s1, s2) {
1078 if (s == s1) {
1079 return s2;
1080 } else {
1081 return s;
1082 }
1083}
1084
8b1938ea 1085# There should be one or two tabs after the colon.
1086function format_preamble()
1087{
57caba32 1088 if (/^#/ || /^%bcond_with/) {
08f60a73
ER		 1089 return;
1090 }
aec1bddb 1091 sub(/:[ \t]*/, ":")
2b94cfb4
ER		 1092 if (match($0, /[A-Za-z0-9(),#_ \t.-]+[ \t]*:[ \t]*/) == 1) {
1093 if (RLENGTH < 8) {
aec1bddb 1094 sub(/:/, ":\t\t")
b6875e34 1095 } else {
aec1bddb 1096 sub(/:/, ":\t")
b6875e34 1097 }
8b1938ea 1098 }
1099}
1100
43c05c3c 1101# Replace directly specified directories with macros
1102function use_macros()
1103{
13b24a87
ER		 1104 # -m, --skip-macros, --no-macros -- skip macros subst
1105 if (ENVIRON["SKIP_MACROS"]) {
1106 return
1107 }
1108
b05d5275
ER		 1109 # leave inline sed lines alone
1110 if (/(%{__sed}|sed) -i -e/) {
1111 return;
1112 }
1113
b6875e34
ER		 1114 sub("%{_defaultdocdir}", "%{_docdir}");
1115 sub("%{_bindir}/perl", "%{__perl}");
1116 sub("%{_bindir}/python", "%{__python}");
36d9a33d 1117
a372a159
ER		 1118 gsub(infodir, "%{_infodir}")
1119
336c1a4f
ER		 1120 gsub(perl_sitearch, "%{perl_sitearch}")
1121 gsub(perl_archlib, "%{perl_archlib}")
1122 gsub(perl_privlib, "%{perl_privlib}")
336c1a4f
ER		 1123 gsub(perl_vendorlib, "%{perl_vendorlib}")
1124 gsub(perl_vendorarch, "%{perl_vendorarch}")
1125 gsub(perl_sitelib, "%{perl_sitelib}")
9732cb3d
ER		 1126
1127 gsub(py_sitescriptdir, "%{py_sitescriptdir}")
4ab1678b 1128 gsub(py_sitedir, "%{py_sitedir}")
1bdf7824 1129 gsub(py_scriptdir, "%{py_scriptdir}")
4a62fb54 1130 gsub("%{_libdir}/python2.4/site-packages", "%{py_sitedir}")
6f2c1099
ER		 1131
1132 gsub(ruby_archdir, "%{ruby_archdir}")
1133 gsub(ruby_ridir, "%{ruby_ridir}")
1134 gsub(ruby_rubylibdir, "%{ruby_rubylibdir}")
1135 gsub(ruby_sitearchdir, "%{ruby_sitearchdir}")
1136 gsub(ruby_sitelibdir, "%{ruby_sitelibdir}")
51847161 1137 gsub(ruby_rdocdir, "%{ruby_rdocdir}")
6f2c1099 1138
4a62fb54
ER		 1139 gsub("%{_datadir}/applications", "%{_desktopdir}")
1140 gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}")
ee9487af 1141 gsub("%{_datadir}/java", "%{_javadir}")
336c1a4f 1142
a4de4386
ER		 1143 gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}")
1144 gsub(pkgconfigdir, "%{_pkgconfigdir}")
1145
1c298a13
ER		 1146 gsub("%{_datadir}/pkgconfig", "%{_npkgconfigdir}")
1147 gsub(npkgconfigdir, "%{_npkgconfigdir}")
1148
e00f41b5 1149 gsub(libdir, "%{_libdir}")
ee9487af 1150 gsub(javadir, "%{_javadir}")
e00f41b5 1151
aec1bddb 1152 gsub(bindir, "%{_bindir}")
74edc57e 1153 gsub("%{prefix}/bin", "%{_bindir}")
b05d5275 1154 if (prefix"/bin" == bindir)
0080f34c 1155 gsub("%{_prefix}/bin", "%{_bindir}")
74edc57e 1156
de69503c 1157 for (c = 1; c <= NF; c++) {
1158 if ($c ~ sbindir "/fix-info-dir")
1159 continue;
3457b4f7
ER		 1160 if ($c ~ sbindir "/webapp")
1161 continue;
a372a159
ER		 1162 if ($c ~ sbindir "/ldconfig")
1163 continue;
4837c1e3
ER		 1164 if ($c ~ sbindir "/chsh")
1165 continue;
1166 if ($c ~ sbindir "/usermod")
1167 continue;
f06959ff
ER		 1168 if ($c ~ sbindir "/chkconfig")
1169 continue;
836e411f
ER		 1170 if ($c ~ sbindir "/installzope(product|3package)")
1171 continue;
de69503c 1172 gsub(sbindir, "%{_sbindir}", $c)
1173 }
1174
74edc57e 1175 gsub("%{prefix}/sbin", "%{_sbindir}")
836e411f 1176 if (prefix"/sbin" == sbindir) {
5e1d0492 1177 gsub("%{_prefix}/sbin", "%{_sbindir}")
836e411f 1178 }
74edc57e 1179
353f5eea 1180 for (c = 1; c <= NF; c++) {
0965a1a0 1181 if ($c ~ sysconfdir "/{?cron.")
de69503c 1182 continue;
0080f34c 1183 if ($c ~ sysconfdir "/{?crontab.d")
807a0f6b 1184 continue;
6c178315
ER		 1185 if ($c ~ sysconfdir "/{?env.d")
1186 continue;
90a421f5 1187 if ($c ~ sysconfdir "/{?modprobe.(d|conf)")
554d6b98 1188 continue;
5d7c48a4
ER		 1189 if ($c ~ sysconfdir "/{?udev")
1190 continue;
1191 if ($c ~ sysconfdir "/{?hotplug")
e61b5989 1192 continue;
0080f34c 1193 if ($c ~ sysconfdir "/{?logrotate.d")
353f5eea 1194 continue;
0080f34c 1195 if ($c ~ sysconfdir "/{?pam.d")
a9b2c8c7 1196 continue;
0080f34c 1197 if ($c ~ sysconfdir "/{?profile.d")
66ef7810 1198 continue;
0080f34c 1199 if ($c ~ sysconfdir "/{?rc.d")
9ad7f20b 1200 continue;
0080f34c 1201 if ($c ~ sysconfdir "/{?security")
a9b2c8c7 1202 continue;
0080f34c 1203 if ($c ~ sysconfdir "/{?skel")
c21d1979 1204 continue;
0080f34c 1205 if ($c ~ sysconfdir "/{?sysconfig")
66ef7810 1206 continue;
6e985933
ER		 1207 if ($c ~ sysconfdir "/{?shrc.d")
1208 continue;
7c73bc0f
ER		 1209 if ($c ~ sysconfdir "/{?certs")
1210 continue;
de5d18d8
ER		 1211 if ($c ~ sysconfdir "/{?X11")
1212 continue;
5debd9f6
ER		 1213 if ($c ~ sysconfdir "/{?ld.so.conf.d")
1214 continue;
ff21ed9e
ER		 1215 if ($c ~ sysconfdir "/{?rpm")
1216 continue;
57caba32 1217 if ($c ~ sysconfdir "/{?bash_completion.d")
6e985933 1218 continue;
57caba32 1219 if ($c ~ sysconfdir "/{?samba")
9292b547 1220 continue;
52a943cf
ER		 1221 if ($c ~ sysconfdir "/shells")
1222 continue;
5dc7f5e4
ER		 1223 if ($c ~ sysconfdir "/ppp")
1224 continue;
9395915a
ER		 1225 if ($c ~ sysconfdir "/dbus-1")
1226 continue;
be827f42
ER		 1227 if ($c ~ sysconfdir "/tmpwatch")
1228 continue;
471a5464
ER		 1229 if ($c ~ sysconfdir "/acpi")
1230 continue;
1231 if ($c ~ sysconfdir "/apm")
1232 continue;
353f5eea 1233 gsub(sysconfdir, "%{_sysconfdir}", $c)
1234 }
74edc57e 1235
c2b069de 1236 gsub(docdir, "%{_docdir}")
7cb79e98
ER		 1237
1238 gsub(kdedocdir, "%{_kdedocdir}")
1239
1240 gsub(gtkdocdir, "%{_gtkdocdir}")
1241 gsub("%{_docdir}/gtk-doc/html", "%{_gtkdocdir}")
1242
57caba32 1243 gsub(php_pear_dir, "%{php_pear_dir}")
4b1d6e6d 1244 gsub(php_data_dir, "%{php_data_dir}")
c2b069de 1245
c4adc376
ER		 1246 for (c = 1; c <= NF; c++) {
1247 if ($c ~ datadir "/automake")
1248 continue;
13670287
ER		 1249 if ($c ~ datadir "/unsermake")
1250 continue;
a9fb2db8
ER		 1251 if ($c ~ datadir "/file/magic.mime")
1252 continue;
c4adc376
ER		 1253 gsub(datadir, "%{_datadir}", $c)
1254 }
1255
74edc57e 1256 gsub("%{prefix}/share", "%{_datadir}")
c4adc376 1257 if (prefix"/share" == datadir)
0080f34c 1258 gsub("%{_prefix}/share", "%{_datadir}")
74edc57e 1259
826b40ea
ER		 1260 # CFLAGS="-I/usr/include/ncurses is usually correct.
1261 if (!/-I\/usr\/include/) {
1262 gsub(includedir, "%{_includedir}")
1263 }
1264
74edc57e 1265 gsub("%{prefix}/include", "%{_includedir}")
826b40ea 1266 if (prefix"/include" == includedir) {
0080f34c 1267 gsub("%{_prefix}/include", "%{_includedir}")
826b40ea 1268 }
74edc57e 1269
aec1bddb 1270 gsub(mandir, "%{_mandir}")
826b40ea 1271 if ($0 !~ "%{_datadir}/manual") {
5e1d0492 1272 gsub("%{_datadir}/man", "%{_mandir}")
826b40ea 1273 }
9ce0df66 1274 gsub("%{_prefix}/share/man", "%{_mandir}")
1275 gsub("%{prefix}/share/man", "%{_mandir}")
74edc57e 1276 gsub("%{prefix}/man", "%{_mandir}")
1277 gsub("%{_prefix}/man", "%{_mandir}")
1278
aec1bddb 1279 gsub(infodir, "%{_infodir}")
74edc57e 1280 gsub("%{prefix}/info", "%{_infodir}")
1281 gsub("%{_prefix}/info", "%{_infodir}")
1282
0965a1a0 1283 if (prefix !~ "/X11R6") {
1284 gsub("%{_datadir}/aclocal", "%{_aclocaldir}")
1285 }
cfbf94ec 1286
2a638fcb 1287 gsub(examplesdir, "%{_examplesdir}")
7c6b85c4 1288
efd2d668 1289 if (prefix != "/") {
a9fb2db8
ER		 1290 # leave --with-foo=/usr alone
1291 if ($0 !~ "--with.*=.*" prefix) {
1292 for (c = 1; c <= NF; c++) {
1293 if ($c ~ prefix "/sbin/fix-info-dir")
1294 continue;
3457b4f7
ER		 1295 if ($c ~ prefix "/sbin/webapp")
1296 continue;
4837c1e3
ER		 1297 if ($c ~ prefix "/sbin/chsh")
1298 continue;
1299 if ($c ~ prefix "/sbin/usermod")
1300 continue;
836e411f
ER		 1301 if ($c ~ prefix "/sbin/installzope(product|3package)")
1302 continue;
a9fb2db8
ER		 1303 if ($c ~ prefix "/share/automake")
1304 continue;
1305 if ($c ~ prefix "/share/unsermake")
1306 continue;
1307 if ($c ~ prefix "/lib/sendmail")
1308 continue;
97dae8dc
ER		 1309 if ($c ~ prefix "/lib/pkgconfig")
1310 continue;
826b40ea 1311
b5fc4b79
ER		 1312 # CFLAGS="-I/usr..." is usually correct.
1313 if (/-I\/usr/)
826b40ea 1314 continue;
474f0944
ER		 1315 # same for LDFLAGS="-L/usr..."
1316 if (/-L\/usr/)
1317 continue;
826b40ea 1318
a9fb2db8
ER		 1319 gsub(prefix, "%{_prefix}", $c)
1320 }
de69503c 1321 }
efd2d668 1322 gsub("%{prefix}", "%{_prefix}")
1323 }
3bcd1fab 1324
53d16b95
ER		 1325 # replace back
1326 gsub("%{_includedir}/ncurses", "/usr/include/ncurses")
1327 gsub("%{_includedir}/freetype", "/usr/include/freetype")
1328
3bcd1fab 1329 gsub("%{PACKAGE_VERSION}", "%{version}")
1330 gsub("%{PACKAGE_NAME}", "%{name}")
b35c10f1 1331
59e208d5 1332 gsub("^make$", "%{__make}")
1333 gsub("^make ", "%{__make} ")
61b753c5 1334 gsub("^gcc ", "%{__cc} ")
67fe737e 1335 gsub("^rm --interactive=never ", "%{__rm} ")
9aece8c8 1336
471a5464
ER		 1337 # fedora
1338 gsub("%{ruby_sitearch}", "%{ruby_sitearchdir}")
1339 gsub("%{python_sitearch}", "%{py_sitedir}")
e02ad475
ER		 1340 gsub("%{python_sitelib}", "%{py_sitescriptdir}")
1341
1342 # alt linux
1343 gsub("%_man1dir", "%{_mandir}/man1")
471a5464 1344
cab706de
ER		 1345 # mandrake specs
1346 gsub("^%make$", "%{__make}")
1347 gsub("^%make ", "%{__make} ")
1348 gsub("^%makeinstall_std", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
b7ca53a5 1349 gsub("^%{makeinstall}", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
63d47bae 1350 gsub("^%makeinstall", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
cab706de 1351 gsub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT")
b7ca53a5 1352 gsub("^%{__install}", "install")
cab706de
ER		 1353 gsub("%optflags", "%{rpmcflags}")
1354 gsub("%{compat_perl_vendorarch}", "%{perl_vendorarch}")
1355
a6ed8b03 1356 gsub("^%{__make} install DESTDIR=\$RPM_BUILD_ROOT", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
d11acde9 1357 gsub("^fix-info-dir$", "[ ! -x /usr/sbin/fix-info-dir ] || /usr/sbin/fix-info-dir -c %{_infodir} >/dev/null 2>\\&1")
5e15e952
ER		 1358 $0 = fixedsub("%buildroot", "$RPM_BUILD_ROOT", $0)
1359 $0 = fixedsub("%{buildroot}", "$RPM_BUILD_ROOT", $0)
63d47bae 1360 $0 = fixedsub("CXXFLAGS=%{rpmcflags} %configure", "CXXFLAGS=%{rpmcflags}\n%configure", $0);
43f8581a 1361 $0 = fixedsub("%__install", "install", $0);
63d47bae 1362
740e3cd8
ER		 1363 # split configure line to multiple lines
1364 if (/%configure / && !/\\$/) {
1365 $0 = format_configure($0);
1366 }
1367
ac779c71
ER		 1368 gsub("%_bindir", "%{_bindir}")
1369 gsub("%_datadir", "%{_datadir}")
1370 gsub("%_iconsdir", "%{_iconsdir}")
c2b069de
ER		 1371 gsub("%_sbindir", "%{_sbindir}")
1372 gsub("%_mandir", "%{_mandir}")
1373 gsub("%name", "%{name}")
b6875e34
ER		 1374 gsub(/%__rm/, "rm");
1375 gsub(/%__mkdir_p/, "install -d");
1376 gsub(/%__cp/, "cp");
1377 gsub(/%__ln_s/, "ln -s");
1378 gsub(/%__sed/, "%{__sed}");
1379 gsub(/%__cat/, "cat");
1380 gsub(/%__chmod/, "chmod");
a6ed8b03 1381
9aece8c8 1382 gsub("/usr/src/linux", "%{_kernelsrcdir}")
1383 gsub("%{_prefix}/src/linux", "%{_kernelsrcdir}")
1c955424 1384
ecaaa784 1385 if (/^ant / || /^%{ant}/) {
1c955424 1386 sub(/^ant/, "%ant")
ecaaa784 1387 sub(/^%{ant}/, "%ant")
b6875e34
ER		 1388 add_br("BuildRequires: jpackage-utils");
1389 add_br("BuildRequires: rpmbuild(macros) >= 1.300");
1390 }
1c955424 1391
2dc1a8cd
ER		 1392 $0 = fixedsub("%(%{__cc} -dumpversion)", "%{cc_version}", $0);
1393 $0 = fixedsub("%(%{__cxx} -dumpversion)", "%{cxx_version}", $0);
d6e33af7
ER		 1394
1395 # kill the _class and _subclass pear macros
1396 if (pear_class) {
1397 gsub("%{_class}", pear_class);
1398 }
1399 if (pear_subclass) {
1400 gsub("%{_subclass}", pear_subclass);
1401 }
1402
9ae21f47 1403}
f171fd40 1404
740e3cd8
ER		 1405function format_configure(line, n, a, s) {
1406 n = split(line, a, / /);
1407 s = a[1] " \\\n";
1408 for (i = 2; i <= n; i++) {
1409 s = s "\t" a[i] " \\\n"
1410 }
1411 return s
1412}
1413
7c23055b
ER		 1414
1415# insertion sort of A[1..n]
1416# copied from mawk manual
1417function isort(A,n, i,j,hold) {
1418 for (i = 2; i <= n; i++) {
1419 hold = A[j = i]
1420 while (A[j-1] > hold) {
54caef3d 1421 j-- ; A[j+1] = A[j]
1422 }
7c23055b
ER		 1423 A[j] = hold
1424 }
1425 # sentinel A[0] = "" will be created if needed
1426}
1427
1428
23e0529e 1429function use_files_macros( i, n, t, a, l)
eee34ffb 1430{
e6f1551d
ER		 1431 use_macros()
1432
da6457aa
ER		 1433 # skip comments
1434 if (/^#/) {
484bbf6d 1435 return 1;
da6457aa
ER		 1436 }
1437
f158eddc
ER		 1438 sub("^%doc %{_mandir}", "%{_mandir}")
1439
eee34ffb 1440 gsub("^%{_sbindir}", "%attr(755,root,root) %{_sbindir}")
1441 gsub("^%{_bindir}", "%attr(755,root,root) %{_bindir}")
7c23055b 1442
61cb9711
ER		 1443 # uid/gid nobody is not valid in %files
1444 if (/%attr([^)]*nobody[^)]*)/ && !/FIXME/) {
1445 $0 = $0 " # FIXME nobody user/group can't own files! -adapter.awk"
1446 }
1447
16bb0647
JB		 1448 # s[gu]id programs with globs are evil
1449 if (/%attr\([246]...,.*\*/ && !/FIXME/) {
1450 $0 = $0 " # FIXME no globs for suid/sgid files"
85bed066
ER		 1451 }
1452
5dc673eb 1453 # replace back
8f6ddcd9 1454 gsub("%{_sysconfdir}/cron\.d", "/etc/cron.d")
3feaeac8 1455 gsub("%{_sysconfdir}/crontab\.d", "/etc/crontab.d")
8f6ddcd9
ER		 1456 gsub("%{_sysconfdir}/logrotate\.d", "/etc/logrotate.d")
1457 gsub("%{_sysconfdir}/pam\.d", "/etc/pam.d")
1458 gsub("%{_sysconfdir}/profile\.d", "/etc/profile.d")
1459 gsub("%{_sysconfdir}/rc\.d", "/etc/rc.d")
1460 gsub("%{_sysconfdir}/security", "/etc/security")
1461 gsub("%{_sysconfdir}/skel", "/etc/skel")
1462 gsub("%{_sysconfdir}/sysconfig", "/etc/sysconfig")
1463 gsub("%{_sysconfdir}/certs", "/etc/certs")
5dc673eb 1464 gsub("%{_sysconfdir}/init.d", "/etc/init.d")
9395915a 1465 gsub("%{_sysconfdir}/dbus-1", "/etc/dbus-1")
be827f42
ER		 1466 gsub("%{_sysconfdir}/pki", "/etc/pki")
1467 gsub("%{_sysconfdir}/tmpwatch", "/etc/tmpwatch")
2fc0e274 1468
5dc673eb
ER		 1469 # /etc/init.d -> /etc/rc.d/init.d
1470 if (!/^\/etc\/init\.d$/) {
1471 gsub("/etc/init.d", "/etc/rc.d/init.d")
1472 }
1473
1474 if (/\/etc\/rc\.d\/init\.d\// && !/functions/) {
2fc0e274
ER		 1475 if (!/%attr.*\/etc\/rc\.d\/init\.d/) {
1476 $0 = "%attr(754,root,root) " $0
1477 }
1478 if (/^%attr.*\/etc\/rc\.d\/init\.d/ && !/^%attr\(754 *,/) {
89c604c7 1479 gsub("^%attr\\(... *,", "%attr(754,");
2fc0e274 1480 }
9a7a5776
ER		 1481 }
1482
1c298a13 1483 if (/lib.+\.so\b/ && !/\.so$/ && !/^%attr.*/ && !/%exclude/) {
55356feb
ER		 1484 $0 = "%attr(755,root,root) " $0
1485 }
1486
ab9b09e2
ER		 1487 if (/%{perl_vendorarch}.*\.so$/ && !/^%attr.*/) {
1488 $0 = "%attr(755,root,root) " $0
1489 }
1490
af8efb29
ER		 1491 # remove attrs from man pages
1492 if (/%{_mandir}/ && /^%attr/) {
1493 sub("^%attr\\(.*\\) *", "");
1494 }
1495
f56d5519
ER		 1496 # /etc/sysconfig files
1497 # %attr(640,root,root) %config(noreplace) %verify(not size mtime md5) /etc/sysconfig/*
a825b76b 1498 # attr not required, allow default 644 attr
6ea64b8d 1499 if (!/network-scripts/ && !/%dir/ && !/\.d$/ && !/functions/ && !/\/etc\/sysconfig\/wmstyle/) {
6ea0907e 1500 if (/\/etc\/sysconfig\// && /%config/ && !/%config\(noreplace/) {
5dc673eb
ER		 1501 gsub("%config", "%config(noreplace)")
1502 }
f56d5519 1503
6ea0907e 1504 if (/\/etc\/sysconfig\// && !/%config\(noreplace/) {
5dc673eb
ER		 1505 $NF = "%config(noreplace) " $NF
1506 }
f56d5519 1507
5dc673eb 1508 if (/\/etc\/sysconfig\// && /%attr\(755/) {
89c604c7 1509 gsub("^%attr\\(... *,", "%attr(640,");
5dc673eb 1510 }
f56d5519 1511
5dc673eb
ER		 1512 if (/\/etc\/sysconfig\// && !/%verify/) {
1513 gsub("/etc/sysconfig", "%verify(not size mtime md5) /etc/sysconfig");
1514 }
a825b76b
ER		 1515 }
1516
f56d5519 1517 # kill leading zeros
7dfb4dea
ER		 1518 if (/%attr\(0[1-9]/) {
1519 gsub("%attr\\(0", "%attr(")
1520 }
f9d5d512 1521
95ae7268 1522 # kill leading whitespace
b8085249 1523 gsub(/^ +/, "");
95ae7268 1524
b6875e34
ER		 1525 # kill default attrs
1526 gsub(/%dir %attr\(755,root,root\)/, "%dir");
1527 gsub(/%attr\(755,root,root\) %dir/, "%dir");
1528 if (!/%dir/) {
1529 gsub(/%attr\(644,root,root\) /, "");
1530 }
46292535 1531
7c23055b 1532 # sort %verify attrs
12bfc5c8 1533 if (match($0, /%verify\(not([^)]+)\)/)) {
7c23055b 1534 t = substr($0, RSTART, RLENGTH)
8409a9b2
ER		 1535 # kill commas: %verify(not,md5,size,mtime)
1536 gsub(/,/, " ", t);
1537
7c23055b
ER		 1538 gsub(/^%verify\(not |\)$/, "", t)
1539 n = split(t, a, / /)
1540 isort(a, n)
1541
1542 s = "%verify(not"
1543 for (i = 1 ; i <= n; i++) {
1544 s = s " " a[i]
1545 }
1546 s = s ")"
1547
12bfc5c8 1548 gsub(/%verify\(not[^)]+\)/, s)
7c23055b 1549 }
13defa79
ER		 1550
1551 if (/%{_mandir}/) {
d64e2ec0 1552 gsub("\.gz$", "*")
1080e5b7 1553 gsub("%ext_man$", "*")
13defa79 1554 }
5e15e952 1555
ef6d2b7a 1556 # locale dir and no %lang -> bad
b9080a1b 1557 if (/%{_datadir}\/locale\/.*\// && !/%(dir|lang)/) {
ef6d2b7a
ER		 1558 $(NF + 1) = "# FIXME consider using %find_lang"
1559 }
1560
23e0529e 1561 # python egg-infos
860a6f52 1562 if (match($0, "^%{py_site(script)?dir}/.+-py"py_ver".egg-info$")) {
484bbf6d
ER		 1563 # tests:
1564 #%{py_sitedir}/*-py2.4.egg-info
1565 #%{py_sitescriptdir}/GnuPGInterface-%{version}-py2.4.egg-info
1566 #%{py_sitescriptdir}/python_mpd-%{version}-py2.4.egg-info
1567 #%{py_sitescriptdir}/mechanize-0.1.6b-py2.4.egg-info
1568
860a6f52 1569 l = index($0, "/");
484bbf6d 1570 t = substr($0, 0, l);
23e0529e 1571 s = substr($0, l + 1, RLENGTH - l - length("-py"py_ver".egg-info"));
860a6f52 1572 if (match(s, "[^-]+$")) {
484bbf6d
ER		 1573#printf("s[%s]; start[%d]; length[%d]\n", s, RSTART, RLENGTH);
1574 if (RSTART > 1) {
1575 s = substr(s, 0, RSTART - 1);
5384172a 1576 }
484bbf6d 1577#printf("s2[%s]\n", s);
23e0529e 1578 print "%if \"%{py_ver}\" > \"2.4\""
484bbf6d 1579#print t "/.+.egg-info"
860a6f52 1580 gsub(t "/.+.egg-info", t "/" s "-*.egg-info");
23e0529e
ER		 1581 print
1582 print "%endif"
484bbf6d 1583 return 0;
23e0529e
ER		 1584 }
1585 }
1586
5e15e952
ER		 1587 # atrpms
1588 $0 = fixedsub("%{perl_man1dir}", "%{_mandir}/man1", $0);
1589 $0 = fixedsub("%{perl_man3dir}", "%{_mandir}/man3", $0);
1590 $0 = fixedsub("%{perl_bin}", "%{_bindir}", $0);
97dae8dc
ER		 1591
1592 gsub(libdir "/pkgconfig", "%{_pkgconfigdir}");
1593 gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}");
1594 gsub("%{_prefix}/lib/pkgconfig", "%{_pkgconfigdir}");
eee20d8d
ER		 1595
1596 gsub("%{_datadir}/applications", "%{_desktopdir}");
9730a549 1597 gsub("%{_datadir}/icons", "%{_iconsdir}");
0904210e 1598 gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}");
4b1d6e6d
ER		 1599 gsub("%{_datadir}/pear", "%{php_pear_dir}");
1600 gsub("%{_datadir}/php", "%{php_data_dir}");
484bbf6d
ER		 1601
1602 return 1
eee34ffb 1603}
236b87ac 1604
723ce732
ER		 1605function use_script_macros()
1606{
1607 if (gsub("/sbin/service", "%service")) {
1608 sub(" >/dev/null 2>&1 \|\|:", "");
1609 sub(" 2> /dev/null \|\| :", "");
1610 }
1611}
1612
236b87ac 1613function fill(ch, n, i) {
1614 for (i = 0; i < n; i++)
1615 printf("%c", ch)
1616}
1617
1618function format_flush(line, indent, newline, word, first_word) {
1619 first_word = 1
f171fd40 1620 if (format_indent == -1)
236b87ac 1621 newline = ""
1622 else
1623 newline = fill(" ", format_indent) "- "
1624
1625 while (match(line, /[^\t ]+/)) {
1626 word = substr(line, RSTART, RLENGTH)
1627 if (length(newline) + length(word) + 1 > tw) {
1628 print newline
f171fd40 1629
236b87ac 1630 if (format_indent == -1)
1631 newline = ""
1632 else
1633 newline = fill(" ", format_indent + 2)
1634 first_word = 1
1635 }
1636
1637 if (first_word) {
1638 newline = newline word
1639 first_word = 0
1640 } else
1641 newline = newline " " word
f171fd40 1642
236b87ac 1643 line = substr(line, RSTART + RLENGTH)
1644 }
1645 if (newline ~ /[^\t ]/) {
1646 print newline
1647 }
1648}
1649
eb4bf70e 1650function cflags(var)
1651{
85e708f2 1652 if ($0 == var "=\"$RPM_OPT_FLAGS\"") {
1653 removed[var] = 1
eb4bf70e 1654 return 0
85e708f2 1655 }
f171fd40 1656
246ad57e 1657 if (!/!\?debug/)
fde8f52a 1658 sub("\$RPM_OPT_FLAGS", "%{rpmcflags}")
eb4bf70e 1659 return 1
1660}
0ea7c3cd 1661
8ea8f0ae
ER		 1662function unify_url(url)
1663{
1664
1665 # sourceforge urls
3f8ea9bd
JB		 1666 # Docs about sourceforge mirror system: http://sourceforge.net/apps/trac/sourceforge/wiki/Mirrors
1667 sub("^http://prdownloads\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
1668 sub("^http://download\.sf\.net/", "http://downloads.sourceforge.net/", url)
1669 sub("^http://download\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
1670 sub("^http://dl\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
1671 sub("^http://.*\.dl\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
1672 sub("^http://dl\.sf\.net/", "http://downloads.sourceforge.net/", url)
1673 sub("^http://downloads\.sourceforge\.net/sourceforge/", "http://downloads.sourceforge.net/", url)
2bee6485
ER		 1674 # new style urls, strip "files/" between and prepend dl.
1675 if (match(url, "^http://sourceforge.net/projects/[^/]+/files/")) {
1676 url = substr(url, 1, RLENGTH - length("files/")) substr(url, RSTART + RLENGTH);
3f8ea9bd 1677 sub("^http://sourceforge.net/projects/", "http://downloads.sourceforge.net/project/", url);
2bee6485
ER		 1678 }
1679 if (url ~ /sourceforge.net/) {
1680 sub("[?&]big_mirror=.*$", "", url);
1681 sub("[?&]modtime=.*$", "", url);
1682 sub("[?]use_mirror=.*$", "", url);
1683 sub("[?]download$", "", url);
1684 sub("/download$", "", url);
1685 }
8ea8f0ae
ER		 1686
1687 sub("^ftp://ftp\.gnome\.org/", "http://ftp.gnome.org/", url)
1688 sub("^http://ftp\.gnome\.org/pub/gnome/", "http://ftp.gnome.org/pub/GNOME/", url)
1689
1690 # apache urls
1691 sub("^http://apache.zone-h.org/", "http://www.apache.org/dist/", url)
1692
11401cd0 1693 # gnu.org
a4799779
ER		 1694 sub("^ftp://ftp\.gnu\.org/", "http://ftp.gnu.org/", url)
1695 sub("^http://ftp\.gnu\.org/pub/gnu/", "http://ftp.gnu.org/gnu/", url)
1696
1697 # debian.org
1698 sub("^ftp://ftp\.[^.]+\.debian\.org/", "ftp://ftp.debian.org/", url)
1699 sub("^http://ftp\.[^.]+\.debian\.org/", "ftp://ftp.debian.org/", url)
1700 sub("^ftp://ftp\.debian\.org/pub/debian/", "ftp://ftp.debian.org/debian/", url)
11401cd0 1701
8ea8f0ae
ER		 1702 return url
1703}
1704
4e26c5f2
ER		 1705function demacroize(str)
1706{
8f7c516b
ER		 1707 if (mod_name) {
1708 sub("%{mod_name}", mod_name, str);
1709 }
f5f6280a
ER		 1710 if (pearname) {
1711 sub("%{_pearname}", pearname, str);
1712 }
1713 if (pearname) {
1714 sub("%{pearname}", pearname, str);
1715 }
8f7c516b
ER		 1716 if (name) {
1717 sub("%{name}", name, str);
1718 }
4e26c5f2
ER		 1719 if (version) {
1720 sub("%{version}", version, str);
1721 }
1722 if (_beta) {
1723 sub("%{_beta}", _beta, str);
1724 }
1725 if (_rc) {
1726 sub("%{_rc}", _rc, str);
1727 }
59de1799
ER		 1728 if (_pre) {
1729 sub("%{_pre}", _pre, str);
1730 }
4e26c5f2
ER		 1731 if (_snap) {
1732 sub("%{_snap}", _snap, str);
1733 }
3c5e6e5f
ER		 1734 if (subver) {
1735 sub("%{subver}", subver, str);
1736 }
4e26c5f2
ER		 1737 return str;
1738}
1739
0ea7c3cd
ER		 1740function kill_preamble_macros()
1741{
a64d362e
ER		 1742 if ($1 ~ /^Obsoletes:/) {
1743 # NB! assigning $2 a value breaks tabbing
1744 $2 = demacroize($2);
1745 }
1746 if ($1 ~ /^URL:/) {
8f7c516b 1747 # NB! assigning $2 a value breaks tabbing
4e26c5f2 1748 $2 = demacroize($2);
ec30d23e 1749 $2 = unify_url($2)
0ea7c3cd
ER		 1750 }
1751}
ba377afe 1752
9815f9b2
ER		 1753function get_epoch(pkg, ver, epoch)
1754{
cccfa553
ER		 1755 return
1756# should parse the BR lines more adequately:
1757# freetype = 2.0.0 -> correct
1758# freetype = 2.1.9 -> with epoch 1, as epoch 1 was added in 2.1.7
1759
9815f9b2
ER		 1760 shell = "grep -o '^" pkg ":[^:]\+' ../PLD-doc/BuildRequires.txt | awk '{print $NF}'";
1761 shell | getline epoch;
1762 return epoch;
1763}
1764
ba377afe 1765function format_requires(tag, value, n, p, i, deps, ndeps) {
87b130e2
ER		 1766 # skip any formatting for commented out items or some weird macros
1767 if (/^#/ || /%\(/) {
3f81d059
ER		 1768 return tag "\t" value
1769 }
ba377afe
ER		 1770 n = split(value, p, / *,? */);
1771 for (i = 1; i <= n; i++) {
1772 if (p[i+1] ~ /[<=>]/) {
9815f9b2
ER		 1773 # add epoch if the version doesn't have it but BuildRequires.txt has
1774 if (p[i] ~ /^[a-z]/ && p[i+2] !~ /^[0-9]+:/) {
1775 epoch = get_epoch(p[i], p[i+2])
1776 if (epoch) {
1777 p[i+2] = epoch ":" p[i+2];
1778 }
1779 }
ba377afe
ER		 1780 deps[ndeps++] = p[i] " " p[i+1] " " p[i+2];
1781 i += 2;
1782 } else {
1783 deps[ndeps++] = p[i];
1784 }
1785 }
1786 s = ""
1787 for (i in deps) {
1788 s = s sprintf("%s\t%s\n", tag, deps[i]);
1789 }
1790 return substr(s, 1, length(s)-1);
1791}
6ebff802
ER		 1792
1793function use_tabs()
1794{
1795 # reverse vim: ts=4 sw=4 et
1796 gsub(/ /, "\t");
1797}
1c955424
ER		 1798
1799function add_br(br)
1800{
b6875e34 1801 BR[BR_count++] = br
1c955424
ER		 1802}
1803
76c7e23c
ER		 1804
1805# Load rpm macros
1806# you should update the list also in adapter when making changes here
1807function import_rpm_macros() {
1808 # File with rpm groups
1809 topdir = ENVIRON["_topdir"]
1810
1811 if (!topdir) {
1812 print "adapter.awk should not not be invoked directly, but via adapter script" > "/dev/stderr"
1813 do_not_touch_anything = 1
a4de4386
ER		 1814 exit(rc = 1);
1815 }
1816
1c298a13 1817 if (!ENVIRON["ADAPTER_REVISION"] || ENVIRON["ADAPTER_REVISION"] < 1.46) {
a4de4386
ER		 1818 print "adapter shell script is outdated, please cvs up it" > "/dev/stderr"
1819 do_not_touch_anything = 1
1820 exit(rc = 1);
76c7e23c
ER		 1821 }
1822
1823 # get cvsaddress for changelog section
1824 # using rpm macros as too lazy to add ~/.adapterrc parsing support.
1825 _cvsmaildomain = ENVIRON["_cvsmaildomain"]
1826 _cvsmailfeedback = ENVIRON["_cvsmailfeedback"]
1827
1828 prefix = ENVIRON["_prefix"]
1829 bindir = ENVIRON["_bindir"]
1830 sbindir = ENVIRON["_sbindir"]
1831 libdir = ENVIRON["_libdir"]
1832 sysconfdir = ENVIRON["_sysconfdir"]
1833 datadir = ENVIRON["_datadir"]
1834 includedir = ENVIRON["_includedir"]
1835 mandir = ENVIRON["_mandir"]
1836 infodir = ENVIRON["_infodir"]
1837 examplesdir = ENVIRON["_examplesdir"]
1838 docdir = ENVIRON["_defaultdocdir"]
1839 kdedocdir = ENVIRON["_kdedocdir"]
1840 gtkdocdir = ENVIRON["_gtkdocdir"]
1841 desktopdir = ENVIRON["_desktopdir"]
1842 pixmapsdir = ENVIRON["_pixmapsdir"]
1843 javadir = ENVIRON["_javadir"]
a4de4386 1844 pkgconfigdir = ENVIRON["_pkgconfigdir"]
1c298a13 1845 npkgconfigdir = ENVIRON["_npkgconfigdir"]
76c7e23c
ER		 1846
1847 perl_sitearch = ENVIRON["perl_sitearch"]
1848 perl_archlib = ENVIRON["perl_archlib"]
1849 perl_privlib = ENVIRON["perl_privlib"]
1850 perl_vendorlib = ENVIRON["perl_vendorlib"]
1851 perl_vendorarch = ENVIRON["perl_vendorarch"]
1852 perl_sitelib = ENVIRON["perl_sitelib"]
1853
1854 py_sitescriptdir = ENVIRON["py_sitescriptdir"]
1855 py_sitedir = ENVIRON["py_sitedir"]
1856 py_scriptdir = ENVIRON["py_scriptdir"]
1857 py_ver = ENVIRON["py_ver"]
1858
1859 ruby_archdir = ENVIRON["ruby_archdir"]
1860 ruby_ridir = ENVIRON["ruby_ridir"]
1861 ruby_rubylibdir = ENVIRON["ruby_rubylibdir"]
1862 ruby_sitearchdir = ENVIRON["ruby_sitearchdir"]
1863 ruby_sitelibdir = ENVIRON["ruby_sitelibdir"]
1864 ruby_rdocdir = ENVIRON["ruby_rdocdir"]
1865
1866 php_pear_dir = ENVIRON["php_pear_dir"]
1867 php_data_dir = ENVIRON["php_data_dir"]
1868 tmpdir = ENVIRON["tmpdir"]
1869}
1870
1871
1872# php virtual deps as discussed in devel-en
1873function replace_php_virtual_deps() {
1874 pkg = $2
1875# if (pkg == "php-program") {
1876# $0 = $1 "\t/usr/bin/php"
1877# return
1878# }
1879
1880# if (pkg ~ /^php-[a-z]/ && pkg !~ /^php-(pear|common|cli|devel|fcgi|cgi|dirs|program|pecl-)/) {
1881# sub(/^php-/, "php(", pkg);
1882# sub(/$/, ") # verify this correctness -- it may be wanted to use specific not virtual dep", pkg);
1883# $2 = pkg
1884# }
1885
1886 if (pkg ~/^php$/) {
1887 $2 = "webserver(php)";
1888 if ($4 ~ /^[0-9]:/) {
1889 $4 = substr($4, 3);
1890 }
1891 }
1892
1893 if (pkg ~/^php4$/) {
1894 $2 = "webserver(php)";
1895 if ($4 ~ /^[0-9]:/) {
1896 $4 = substr($4, 3);
1897 }
1898 }
1899}
1900
e27788d1 1901function replace_requires() {
92fa789e 1902
517313c5 1903 sub(/^python-setuptools-devel$/, "python-distribute", $2);
532cbdf9
ER		 1904
1905 # use virtual, not package name
1906 sub(/^rpm-build-macros$/, "rpmbuild(macros)", $2);
1907
6ca05bf8
ER		 1908 # bad package.xml, see http://pear.php.net/bugs/bug.php?id=17779
1909 sub(/^php-php-gtk/, "php-gtk2", $2);
1910
92fa789e 1911 # jpackages
de0b52ae 1912 sub(/^antlr3$/, "java-antlr3", $2);
83ed1722 1913 sub(/^avalon-framework$/, "java-avalon-framework", $2);
1914 sub(/^avalon-logkit$/, "java-avalon-logkit", $2);
6b5f846d 1915 sub(/^axis$/, "java-axis", $2);
de0b52ae 1916 sub(/^bsf$/, "java-bsf", $2);
d95a12d3
ER		 1917 sub(/^gnu-regexp$/, "java-gnu-regexp", $2);
1918 sub(/^gnu.regexp$/, "java-gnu-regexp", $2);
22e27c40 1919 sub(/^hamcrest$/, "java-hamcrest", $2);
ed0e2c9b 1920 sub(/^jaas$/, "java(jaas)", $2);
1921 sub(/^jaf$/, "java(jaf)", $2);
6b5f846d 1922 sub(/^jakarta-ant$/, "ant", $2);
1923 sub(/^jakarta-commons-httpclient$/, "java-commons-httpclient", $2);
1924 sub(/^jakarta-log4j$/, "java-log4j", $2);
1925 sub(/^jakarta-oro$/, "java-oro", $2);
83ed1722 1926 sub(/^jakarta-servletapi$/, "java(servlet)", $2);
3c606e9e
ER		 1927 sub(/^java-devel$/, "jdk", $2);
1928 sub(/^java\(JSP\)$/, "java(jsp)", $2);
1929 sub(/^java\(JavaServerFaces\)$/, "java(javaserverfaces)", $2);
1930 sub(/^java\(Portlet\)$/, "java(portlet)", $2);
1931 sub(/^java\(Servlet\)$/, "java(servlet)", $2);
6b5f846d 1932 sub(/^javamail$/, "java(javamail)", $2);
ed0e2c9b 1933 sub(/^jaxp$/, "java(jaxp)", $2);
1934 sub(/^jaxp_parser_impl$/, "java(jaxp_parser_impl)", $2);
9d9c44b3 1935 sub(/^jaxp_transform_impl$/, "java(jaxp_transform_impl)", $2);
ed0e2c9b 1936 sub(/^jce$/, "java(jce)", $2);
dda2335f 1937 sub(/^jcommon$/, "java-jcommon", $2);
ed0e2c9b 1938 sub(/^jdbc-stdext$/, "java(jdbc-stdext)", $2);
de0b52ae 1939 sub(/^jdepend$/, "java-jdepend", $2);
dda2335f 1940 sub(/^jfreechart$/, "java-jfreechart", $2);
ed0e2c9b 1941 sub(/^jmx$/, "java(jmx)", $2);
1942 sub(/^jndi$/, "java(jndi)", $2);
de0b52ae 1943 sub(/^jsch$/, "java-jsch", $2);
ed0e2c9b 1944 sub(/^jsse$/, "java(jsse)", $2);
9d9c44b3 1945 sub(/^jta$/, "java(jta)", $2);
de0b52ae 1946 sub(/^junit$/, "java-junit", $2);
6b5f846d 1947 sub(/^ldapjdk$/, "ldapsdk", $2);
1948 sub(/^log4j$/, "java-log4j", $2);
1949 sub(/^logging-log4j$/, "java-log4j", $2);
1950 sub(/^oro$/, "java-oro", $2);
1951 sub(/^rhino$/, "java-rhino", $2);
1952 sub(/^saxon-scripts$/, "saxon", $2);
9d9c44b3 1953 sub(/^servlet$/, "java(servlet)", $2);
6b5f846d 1954 sub(/^uddi4j$/, "java-uddi4j", $2);
1955 sub(/^wsdl4j$/, "java-wsdl4j", $2);
6b5f846d 1956 sub(/^xalan-j$/, "java-xalan", $2);
3c606e9e 1957 sub(/^xalan-j2$/, "java-xalan", $2);
6b5f846d 1958 sub(/^xerces-j$/, "java-xerces", $2);
3c606e9e 1959 sub(/^xerces-j2$/, "java-xerces", $2);
6b5f846d 1960 sub(/^xml-commons-apis$/, "java-xml-commons-apis", $2);
1961 sub(/^xml-commons-resolver$/, "java-xml-commons-resolver", $2);
92fa789e 1962
3c606e9e 1963 # fedora / redhat
435d1309 1964 sub(/^Django$/, "python-django", $2);
09f3f638 1965 sub(/^GitPython$/, "python-git", $2);
03180d14 1966 sub(/^chkconfig$/, "/sbin/chkconfig", $2);
da9ff7a7 1967 sub(/^db4-devel$/, "db-devel", $2);
3c606e9e
ER		 1968 sub(/^dbus-python$/, "python-dbus", $2);
1969 sub(/^file-devel$/, "libmagic-devel", $2);
0e53c084 1970 sub(/^freetype2-devel$/, "freetype-devel", $2);
154cb95a 1971 sub(/^fuse-devel$/, "libfuse-devel", $2);
3c606e9e
ER		 1972 sub(/^gamin-python$/, "python-gamin", $2);
1973 sub(/^gcc-c\+\+$/, "libstdc++-devel", $2);
af8efb29 1974 sub(/^gnome-python2-extras$/, "python-gnome-extras", $2);
471a5464 1975 sub(/^gnome-python2-gtkspell$/, "python-gnome-extras-gtkspell", $2);
0e53c084 1976 sub(/^gtk-sharp2-devel$/, "dotnet-gtk-sharp2-devel", $2);
af8efb29 1977 sub(/^gtk2$/, "gtk+2", $2);
8aede7e3 1978 sub(/^gtk2-devel$/, "gtk+2-devel", $2);
3c606e9e 1979 sub(/^initscripts$/, "rc-scripts", $2);
0e53c084 1980 sub(/^iproute$/, "iproute2", $2);
3c606e9e
ER		 1981 sub(/^iscsi-initiator-utils$/, "open-iscsi", $2);
1982 sub(/^libXft-devel$/, "xorg-lib-libXft-devel", $2);
da9ff7a7 1983 sub(/^libXrandr-devel$/, "xorg-lib-libXrandr-devel", $2);
0e53c084 1984 sub(/^libcurl-devel$/, "curl-devel", $2);
e02ad475 1985 sub(/^mod_wsgi$/, "apache-mod_wsgi", $2);
3c606e9e 1986 sub(/^notify-python$/, "python-pynotify", $2);
039d8103 1987 sub(/^pulseaudio-libs-devel$/, "pulseaudio-devel", $2);
2bbf619a 1988 sub(/^pyOpenSSL$/, "python-pyOpenSSL", $2);
4a7554aa 1989 sub(/^pygobject2$/, "python-pygobject", $2);
3c606e9e
ER		 1990 sub(/^pygtk2$/, "python-pygtk", $2);
1991 sub(/^pygtk2-devel$/, "python-pygtk-devel", $2);
e02ad475 1992 sub(/^python-enchant$/, "python-pyenchant", $2);
e27788d1
ER		 1993 sub(/^python-imaging$/, "python-PIL", $2);
1994 sub(/^python-imaging-tk$/, "python-PIL-tk", $2);
471a5464 1995 sub(/^python-pygtk$/, "python-pygtk-gtk", $2);
e02ad475 1996 sub(/^python2-devel$/, "python-devel", $2);
3c606e9e 1997 sub(/^qt4-devel$/, "qt4-build", $2);
da9ff7a7 1998 sub(/^qtlockedfile-devel$/, "QtLockedFile-devel", $2);
b86601da 1999 sub(/^rpm-python$/, "python-rpm", $2);
3c606e9e
ER		 2000 sub(/^tftp-server$/, "tftpdaemon", $2);
2001 sub(/^tkinter$/, "python-tkinter", $2);
435d1309 2002 sub(/^xapian-bindings-python$/, "python-xapian", $2);
06509408 2003
b1fc2b39 2004 # debian / ubuntu
3c606e9e
ER		 2005 sub(/^blkid-dev$/, "libblkid-devel", $2);
2006 sub(/^ext2fs-dev$/, "e2fsprogs-devel", $2);
2007 sub(/^libao-dev$/, "libao-devel", $2);
aead9fa9
ER		 2008 sub(/^libboost-filesystem[0-9.]+-dev$/, "boost-devel", $2);
2009 sub(/^libboost-program-options[0-9.]+-dev$/, "boost-devel", $2);
2010 sub(/^libboost-regex[0-9.]+-dev$/, "boost-devel", $2);
2011 sub(/^libboost-thread[0-9.]+-dev$/, "boost-devel", $2);
aead9fa9 2012 sub(/^libcurl4-openssl-dev$/, "curl-devel", $2);
30a90064 2013 sub(/^libdnet-dev$/, "libdnet-devel", $2);
30a90064 2014 sub(/^libesd0-dev$/, "esound-devel", $2);
30a90064 2015 sub(/^libfishsound1-dev$/, "libfishsound-devel", $2);
3c606e9e
ER		 2016 sub(/^libgconf2-dev$/, "GConf2-devel", $2);
2017 sub(/^libgl1-mesa-dev$/, "OpenGL-devel", $2);
2018 sub(/^libgl1-mesa-dri$/, "OpenGL", $2);
2019 sub(/^libglib2.0-dev$/, "glib2-devel", $2);
2020 sub(/^libglu1-mesa-dev$/, "OpenGL-GLU-devel", $2);
2021 sub(/^libgtk2.0-dev$/, "gtk+2-devel", $2);
2022 sub(/^libhunspell-dev$/, "hunspell-devel", $2);
2023 sub(/^libmcrypt-dev$/, "libmcrypt-devel", $2);
2024 sub(/^libmhash-dev$/, "mhash-devel", $2);
2025 sub(/^liboggz1-dev$/, "libggz-devel", $2);
2026 sub(/^libpango1.0-dev$/, "pango-devel", $2);
2027 sub(/^libqt4-dev$/, "qt4-build", $2);
2028 sub(/^libshout3-dev$/, "libshout-devel", $2);
30a90064 2029 sub(/^libslp-dev$/, "openslp-devel", $2);
3c606e9e
ER		 2030 sub(/^libsndfile1-dev$/, "libsndfile-devel", $2);
2031 sub(/^libspeex-dev$/, "speex-devel", $2);
2032 sub(/^libssl-dev$/, "openssl-devel", $2);
2033 sub(/^libvorbis-dev$/, "libvorbis-devel", $2);
2034 sub(/^libxslt1-dev$/, "libxslt-devel", $2);
2035 sub(/^libxss-dev$/, "xorg-lib-libXScrnSaver-devel", $2);
2036 sub(/^mesa-common-dev$/, "OpenGL-devel", $2);
c7f91339 2037
00697b90
ER		 2038 # altlinux
2039 sub(/^libncurses-devel$/, "ncurses-devel", $2);
2040 sub(/^libncursesxx-devel$/, "ncurses-c++-devel", $2);
2041 sub(/^libpcre-devel$/, "pcre-devel", $2);
2042
517313c5
ER		 2043 # suse
2044 sub(/^libffmpeg-devel$/, "ffmpeg-devel", $2);
2045 sub(/^libexpat-devel$/, "expat-devel", $2);
2046 sub(/^alsa-devel$/, "alsa-lib-devel", $2);
2047 sub(/^libpulse-devel$/, "pulseaudio-devel", $2);
2048 sub(/^gtk-sharp2$/, "dotnet-gtk-sharp2", $2);
2049 sub(/^monodoc-core$/, "mono-monodoc", $2);
2050
92fa789e
ER		 2051 replace_php_virtual_deps()
2052}
2053
683ce9e3 2054function replace_groupnames(group) {
e27788d1 2055 group = replace(group, "Amusements/Games", "Applications/Games");
98e37f1f
ER		 2056 group = replace(group, "Amusements/Games/Strategy/Real Time", "X11/Applications/Games/Strategy");
2057 group = replace(group, "Application/Multimedia", "Applications/Multimedia");
2058 group = replace(group, "Application/System", "Applications/System");
2059 group = replace(group, "Applications/Compilers", "Development/Languages");
2060 group = replace(group, "Applications/Daemons", "Daemons");
2061 group = replace(group, "Applications/Internet", "Applications/Networking");
2062 group = replace(group, "Applications/Internet/Peer to Peer", "Applications/Networking");
2063 group = replace(group, "Applications/Productivity", "X11/Applications");
039d8103 2064 group = replace(group, "Applications/Security", "Applications/System");
00697b90 2065 group = replace(group, "Applications/Web", "Applications/WWW");
98e37f1f
ER		 2066 group = replace(group, "Database", "Applications/Databases");
2067 group = replace(group, "Development/C", "Development/Libraries");
2068 group = replace(group, "Development/Code Generators", "Development");
2069 group = replace(group, "Development/Docs", "Documentation");
2070 group = replace(group, "Development/Documentation", "Documentation");
2071 group = replace(group, "Development/Java", "Development/Languages/Java");
517313c5 2072 group = replace(group, "Development/Languages/C and C++", "Libraries");
98e37f1f
ER		 2073 group = replace(group, "Development/Languages/Other", "Development/Languages");;
2074 group = replace(group, "Development/Languages/Ruby", "Development/Languages");
2075 group = replace(group, "Development/Libraries/C and C++", "Development/Libraries");
2076 group = replace(group, "Development/Libraries/Java", "Development/Languages/Java");
2077 group = replace(group, "Development/Libraries/Python", "Development/Languages/Python");
2078 group = replace(group, "Development/Libraries/TCL", "Development/Languages/Tcl");;
2079 group = replace(group, "Development/Other", "Development");
2080 group = replace(group, "Development/Python", "Development/Languages/Python");
2081 group = replace(group, "Development/Testing", "Development");
00697b90 2082 group = replace(group, "Editors", "Applications/Text");
98e37f1f 2083 group = replace(group, "Emulators", "Applications/Emulators");
377e5b9e 2084 group = replace(group, "File tools", "Applications/File");
98e37f1f
ER		 2085 group = replace(group, "Games", "Applications/Games");
2086 group = replace(group, "Library/Development", "Development/Libraries");
2087 group = replace(group, "Networking/Deamons", "Networking/Daemons");
3fff41e8 2088 group = replace(group, "Networking/Other", "Networking");
98e37f1f 2089 group = replace(group, "Productivity/Databases/Servers", "Applications/Databases");
517313c5 2090 group = replace(group, "Productivity/Multimedia/Other", "X11/Applications/Multimedia");
98e37f1f
ER		 2091 group = replace(group, "Productivity/Networking/Web/Servers", "Networking/Daemons/HTTP");;
2092 group = replace(group, "Shells", "Applications/Shells");
2093 group = replace(group, "System Environment/Base", "Base");
2094 group = replace(group, "System Environment/Daemons", "Daemons");
2095 group = replace(group, "System Environment/Kernel", "Base/Kernel");
2096 group = replace(group, "System Environment/Libraries", "Libraries");
ad2932df 2097 group = replace(group, "System Tools", "Applications/System");
98e37f1f
ER		 2098 group = replace(group, "System", "Base");
2099 group = replace(group, "System/Base", "Base");
2100 group = replace(group, "System/Kernel and hardware", "Base/Kernel");
2101 group = replace(group, "System/Libraries", "Libraries");
2102 group = replace(group, "System/Servers", "Daemons");
2103 group = replace(group, "Text Processing/Markup/HTML", "Applications/Text");
2104 group = replace(group, "Text Processing/Markup/XML", "Applications/Text");
00697b90 2105 group = replace(group, "Text tools", "Applications/Text");
ad2932df 2106 group = replace(group, "User Interface/Desktops", "X11/Applications");
b4286815 2107 group = replace(group, "Utilities/System", "Applications/System");
98e37f1f
ER		 2108 group = replace(group, "Web/Database", "Applications/WWW");
2109 group = replace(group, "X11/GNOME", "X11/Applications");
2110 group = replace(group, "X11/GNOME/Applications", "X11/Applications");
2111 group = replace(group, "X11/GNOME/Development/Libraries", "X11/Development/Libraries");
2112 group = replace(group, "X11/Games", "X11/Applications/Games");
2113 group = replace(group, "X11/Games/Strategy", "X11/Applications/Games/Strategy");
2114 group = replace(group, "X11/Library", "X11/Libraries");
2115 group = replace(group, "X11/Utilities", "X11/Applications");
2116 group = replace(group, "X11/XFree86", "X11");
2117 group = replace(group, "X11/Xserver", "X11/Servers");
ad9ea417
ER		 2118
2119 return group;
2120}
2121
2b94cfb4 2122# vim:ts=4:sw=4
Adapt RPM .spec files to PLD Linux coding standard
This page took 0.680733 seconds and 4 git commands to generate.