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