]>
Commit | Line | Data |
---|---|---|
1 | #!/usr/bin/gawk -f | |
2 | # | |
3 | # Adapter adapts .spec files for PLD Linux. | |
4 | # | |
5 | # Copyright (C) 1999-2010 PLD-Team <feedback@pld-linux.org> | |
6 | # Authors: | |
7 | # Michał Kuratczyk <kura@pld.org.pl> | |
8 | # Sebastian Zagrodzki <s.zagrodzki@mimuw.edu.pl> | |
9 | # Tomasz Kłoczko <kloczek@rudy.mif.pg.gda.pl> | |
10 | # Artur Frysiak <wiget@pld-linux.org> | |
11 | # Michal Kochanowicz <mkochano@pld.org.pl> | |
12 | # Jakub Bogusz <qboosh@pld-linux.org> | |
13 | # Elan Ruusamäe <glen@pld-linux.org> | |
14 | # | |
15 | # See cvs log adapter{,.awk} for list of contributors | |
16 | # | |
17 | # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # | |
18 | ||
19 | # TODO | |
20 | # - really long sourceX make preamble sorting totally fcked up (try snake.spec r1.1) | |
21 | # - parse ../PLD-doc/BuildRequires.txt and setup proper BR epoches? | |
22 | # - add "-nc" option to skip CVS interaction | |
23 | # - sort Summary(XX) | |
24 | # - sort Requires, BuildRequires | |
25 | # - check if %description (lang=C) contains 8bit | |
26 | # - desc wrapping is totally fucked up on global.spec,1.25, dosemu.spec,1.115- | |
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 | |
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 ] | |
31 | ||
32 | BEGIN { | |
33 | RPM_SECTIONS = "package|build|changelog|clean|description|install|post|posttrans|postun|pre|prep|pretrans|preun|triggerin|triggerpostun|triggerun|verifyscript|check" | |
34 | SECTIONS = "^%(" RPM_SECTIONS ")" | |
35 | ||
36 | RCSID = "$Id$" | |
37 | rev = RCSID # TODO: parse from RCSID | |
38 | VERSION = "0.35/" rev | |
39 | ||
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))" | |
41 | ||
42 | usedigest = 0 # Enable to switch to rpm 4.4.6+ md5 digests | |
43 | ||
44 | preamble = 1 # Is it part of preamble? Default - yes | |
45 | boc = 4 # Beginning of %changelog | |
46 | bod = 0 # Beginning of %description | |
47 | tw = 70 # Descriptions width | |
48 | ||
49 | b_idx = 0 # index of BR/R arrays | |
50 | BR_count = 0 # number of additional BuildRequires | |
51 | ||
52 | # If variable removed, then 1 (for removing it from export) | |
53 | removed["LDFLAGS"] = 0 | |
54 | removed["CFLAGS"] = 0 | |
55 | removed["CXXFLAGS"] = 0 | |
56 | ||
57 | # If 1, we are inside of comment block (started with /^#%/) | |
58 | comment_block = 0 | |
59 | ||
60 | import_rpm_macros() | |
61 | ||
62 | packages_dir = topdir | |
63 | groups_file = packages_dir "/rpm.groups" | |
64 | ||
65 | system("cd "packages_dir"; [ -f rpm.groups ] || cvs up rpm.groups > /dev/null") | |
66 | system("[ -d ../PLD-doc ] && cd ../PLD-doc && ([ -f BuildRequires.txt ] || cvs up BuildRequires.txt >/dev/null)"); | |
67 | ||
68 | # Temporary file for changelog section | |
69 | changelog_file = ENVIRON["HOME"] "/tmp/adapter.changelog" | |
70 | } | |
71 | ||
72 | # There should be a comment with CVS keywords on the first line of file. | |
73 | FNR == 1 { | |
74 | if (!/^# \$[R]evision: .* \$, \$[D]ate: .* \$$/) { # If this line is already OK? | |
75 | print "# $" "Revision:$, " "$" "Date:$" # No | |
76 | if ( /^#.*([rR]evision|[dD]ate)/ ) # There was something similar, but incorrect | |
77 | next | |
78 | } else { | |
79 | print $0 # Yes | |
80 | next # It is enough for first line | |
81 | } | |
82 | } | |
83 | ||
84 | # If the latest line matched /%files/ | |
85 | defattr == 1 { | |
86 | if (ENVIRON["SKIP_DEFATTR"] != 1) { | |
87 | if ($0 !~ /defattr/) { # If no %defattr | |
88 | print "%defattr(644,root,root,755)" # Add it | |
89 | } else { | |
90 | $0 = "%defattr(644,root,root,755)" # Correct mistakes (if any) | |
91 | } | |
92 | } | |
93 | defattr = 0 | |
94 | } | |
95 | ||
96 | function b_makekey(a, b, s) { | |
97 | s = a "" b; | |
98 | # kill bcond | |
99 | gsub(/[#%]+{[!?]+[_a-zA-Z0-9]+:/, "", s); | |
100 | ||
101 | # kill commented out items | |
102 | gsub(/^#[ \t]*/, "", s); | |
103 | ||
104 | # force order | |
105 | gsub(/^Summary\(/, "11Summary(", s); | |
106 | gsub(/^Summary/, "10Summary", s); | |
107 | ||
108 | gsub(/^Name/, "2Name", s); | |
109 | gsub(/^Version/, "3Version", s); | |
110 | gsub(/^Release/, "4Release", s); | |
111 | gsub(/^Epoch/, "5Epoch", s); | |
112 | gsub(/^License/, "5License", s); | |
113 | gsub(/^Group/, "6Group", s); | |
114 | gsub(/^URL/, "7URL", s); | |
115 | ||
116 | gsub(/^BuildRequires/, "B1BuildRequires", s); | |
117 | gsub(/^BuildConflicts/, "B2BuildConflicts", s); | |
118 | ||
119 | gsub(/^Suggests/, "X1Suggests", s); | |
120 | gsub(/^Provides/, "X2Provides", s); | |
121 | gsub(/^Obsoletes/, "X3Obsoletes", s); | |
122 | gsub(/^Conflicts/, "X4Conflicts", s); | |
123 | gsub(/^BuildArch/, "X5BuildArch", s); | |
124 | gsub(/^ExclusiveArch/, "X6ExclusiveArch", s); | |
125 | gsub(/^ExcludeArch/, "X7ExcludeArch", s); | |
126 | gsub(/^BuildRoot/, "X9BuildRoot", s); | |
127 | ||
128 | gsub(/^AutoProv/, "Xx1AutoProv", s); | |
129 | gsub(/^AutoReq/, "Xx2AutoReq", s); | |
130 | ||
131 | # printf("%s -> %s\n", a""b, s); | |
132 | return s; | |
133 | } | |
134 | ||
135 | # Comments | |
136 | /^#/ && (description == 0) { | |
137 | if (/This file does not like to be adapterized!/) { | |
138 | print # print this message | |
139 | while (getline) # print the rest of spec as it is | |
140 | ||
141 | do_not_touch_anything = 1 # do not touch anything in END() | |
142 | exit(rc = 0) | |
143 | } | |
144 | ||
145 | # Generally, comments are printed without touching | |
146 | sub(/[ \t]+$/, "") | |
147 | ||
148 | if (/#[ \t]*Source.*md5/) { | |
149 | if (usedigest == 1) { | |
150 | sub(/^#[ \t]*Source/, "BuildRequires:\tdigest(%SOURCE", $0) | |
151 | sub(/-md5[ \t]*:[ \t]*/, ") = ", $0) | |
152 | } | |
153 | print $0 | |
154 | next | |
155 | } | |
156 | } | |
157 | ||
158 | /^%define/ { | |
159 | # Remove defining _applnkdir (this macro has been included in rpm-3.0.4) | |
160 | if ($2 == "_applnkdir") { | |
161 | next | |
162 | } | |
163 | if ($2 == "date") { | |
164 | date = 1 | |
165 | if (did_files == 0) { | |
166 | print "%files" | |
167 | print "" | |
168 | did_files = 1 | |
169 | } | |
170 | } | |
171 | ||
172 | # Do not add %define of _prefix if it already is. | |
173 | if ($2 ~ /^_prefix/) { | |
174 | sub("^"prefix, $3, bindir) | |
175 | sub("^"prefix, $3, sbindir) | |
176 | sub("^"prefix, $3, libdir) | |
177 | sub("^"prefix, $3, datadir) | |
178 | sub("^"prefix, $3, includedir) | |
179 | prefix = $3 | |
180 | } | |
181 | ||
182 | if ($2 ~ /_bindir/ && !/_sbindir/) | |
183 | bindir = $3 | |
184 | if ($2 ~ /_sbindir/) | |
185 | sbindir = $3 | |
186 | if ($2 ~ /_libdir/) { | |
187 | if ($3 ~ /^%\(/) { | |
188 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
189 | libdir = "%%%%%%%%%%%%%%" | |
190 | } else { | |
191 | libdir = $3 | |
192 | } | |
193 | } | |
194 | if ($2 ~ /_sysconfdir/) { | |
195 | if ($3 ~ /^%\(/) { | |
196 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
197 | sysconfdir = "%%%%%%%%%%%%%%" | |
198 | } else { | |
199 | sysconfdir = $3 | |
200 | } | |
201 | } | |
202 | if ($2 ~ /_datadir/) { | |
203 | if ($3 ~ /^%\(/) { | |
204 | # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.") | |
205 | datadir = "%%%%%%%%%%%%%%" | |
206 | } else { | |
207 | datadir = $3 | |
208 | } | |
209 | } | |
210 | if ($2 ~ /_includedir/) | |
211 | includedir = $3 | |
212 | if ($2 ~ /_mandir/) | |
213 | mandir = $3 | |
214 | if ($2 ~ /_infodir/) | |
215 | infodir = $3 | |
216 | if ($2 ~ /_docdir/) | |
217 | docdir = $3 | |
218 | ||
219 | # version related macros | |
220 | if ($2 ~ /^_beta$/) | |
221 | _beta = $3 | |
222 | if ($2 ~ /^_rc$/) | |
223 | _rc = $3 | |
224 | if ($2 ~ /^_pre$/) | |
225 | _pre = $3 | |
226 | if ($2 ~ /^_snap$/) | |
227 | _snap = $3 | |
228 | if ($2 ~ /^subver$/) | |
229 | subver = $3 | |
230 | ||
231 | # these are used usually when adapterizing external spec | |
232 | if ($2 ~ /^name$/) | |
233 | name = $3 | |
234 | if ($2 ~ /^version$/) | |
235 | version = $3 | |
236 | if ($2 ~ /^release$/) | |
237 | release = $3 | |
238 | ||
239 | if ($2 ~ /^mod_name$/) | |
240 | mod_name = $3 | |
241 | if ($2 ~ /^_?pearname$/) | |
242 | pearname = $3 | |
243 | if ($2 ~ /^_class$/) | |
244 | pear_class = $3 | |
245 | if ($2 ~ /^_subclass$/) | |
246 | pear_subclass = $3 | |
247 | ||
248 | # kill the _class and _subclass pear macros | |
249 | if ($2 == "_pearname" || $2 == "pearname") { | |
250 | if (pear_class) { | |
251 | gsub("%{_class}", pear_class, $3); | |
252 | } | |
253 | if (pear_subclass) { | |
254 | gsub("%{_subclass}", pear_subclass, $3); | |
255 | } | |
256 | } | |
257 | ||
258 | sub(/[ \t]+$/, ""); | |
259 | # do nothing further, otherwise adapter thinks we're at preamble | |
260 | ||
261 | next | |
262 | } | |
263 | ||
264 | # Obsolete | |
265 | /^%include.*\/usr\/lib\/rpm\/macros\.python$/ { | |
266 | next | |
267 | } | |
268 | ||
269 | ################ | |
270 | # %description # | |
271 | ################ | |
272 | /^%description/, (!/^%description/ && $0 ~ SECTIONS) { | |
273 | preamble = 0 | |
274 | ||
275 | if (/^%description/) { | |
276 | bod++ | |
277 | format_line = "" | |
278 | format_indent = -1 | |
279 | } | |
280 | ||
281 | # Format description | |
282 | if (ENVIRON["SKIP_DESC"] != 1 && description == 1 && !/^%[a-z]+/ && !/^%description/) { | |
283 | if (/^[ \t]*$/) { | |
284 | format_flush(format_line, format_indent) | |
285 | print "" | |
286 | format_line = "" | |
287 | format_indent = -1 | |
288 | } else if (/^[ \t]*[-\*][ \t]*/) { | |
289 | format_flush(format_line, format_indent) | |
290 | match($0, /^[ \t]*/) | |
291 | format_indent = RLENGTH | |
292 | match($0, /^[ \t]*[-\*][ \t]/) | |
293 | format_line = substr($0, RLENGTH) | |
294 | } else | |
295 | format_line = format_line " " $0 | |
296 | next | |
297 | } | |
298 | ||
299 | if (/^%[a-z]+/ && (!/^%description/ || bod == 2)) { | |
300 | if (NF > 3 && $2 == "-l") { | |
301 | ll = $1 | |
302 | for (i = 4; i <= NF; i++) | |
303 | ll = ll " " $i | |
304 | $0 = ll " -l " $3 | |
305 | } | |
306 | format_flush(format_line, format_indent) | |
307 | if (bod == 2) { | |
308 | bod = 1 | |
309 | description = 1 | |
310 | } else { | |
311 | bod = 0 | |
312 | description = 0 | |
313 | } | |
314 | } else | |
315 | description = 1 | |
316 | } | |
317 | ||
318 | ######### | |
319 | # %prep # | |
320 | ######### | |
321 | /^%prep/, (!/^%prep/ && $0 ~ SECTIONS) { | |
322 | preamble = 0 | |
323 | did_prep = 1 | |
324 | ||
325 | use_macros() | |
326 | ||
327 | # Add '-q' to %setup | |
328 | if (/^%setup/ && !/-q/) { | |
329 | sub(/^%setup/, "%setup -q") | |
330 | } | |
331 | ||
332 | if (/^%setup/ && name != "setup") { | |
333 | $0 = fixedsub(name, "%{name}", $0); | |
334 | $0 = fixedsub(version, "%{version}", $0); | |
335 | if (_beta) { | |
336 | $0 = fixedsub(_beta, "%{_beta}", $0); | |
337 | } | |
338 | if (_rc) { | |
339 | $0 = fixedsub(_rc, "%{_rc}", $0); | |
340 | } | |
341 | if (_pre) { | |
342 | $0 = fixedsub(_pre, "%{_pre}", $0); | |
343 | } | |
344 | if (_snap) { | |
345 | $0 = fixedsub(_snap, "%{_snap}", $0); | |
346 | } | |
347 | if (subver) { | |
348 | $0 = fixedsub(subver, "%{subver}", $0); | |
349 | } | |
350 | } | |
351 | ||
352 | if (/^%setup/ && /-n %{name}-%{version}( |$)/) { | |
353 | $0 = fixedsub(" -n %{name}-%{version}", "", $0) | |
354 | } | |
355 | sub("^%patch ", "%patch0 "); | |
356 | ||
357 | # invalid in %prep | |
358 | sub("^rm -rf \$RPM_BUILD_ROOT.*", ""); | |
359 | } | |
360 | ||
361 | ########## | |
362 | # %build # | |
363 | ########## | |
364 | /^%build/, (!/^%build/ && $0 ~ SECTIONS) { | |
365 | preamble = 0 | |
366 | ||
367 | if (did_prep == 0) { | |
368 | print "%prep" | |
369 | print "" | |
370 | did_prep = 1 | |
371 | } | |
372 | ||
373 | use_macros() | |
374 | use_tabs() | |
375 | ||
376 | if (/^automake$/) | |
377 | sub(/$/, " -a -c") | |
378 | ||
379 | if (/LDFLAGS/) { | |
380 | if (/LDFLAGS="-s"/) { | |
381 | removed["LDFLAGS"] = 1 | |
382 | next | |
383 | } else { | |
384 | split($0, tmp, "LDFLAGS=") | |
385 | count = split(tmp[2], flags, "\"") | |
386 | if (flags[1] != "" && flags[1] !~ "!?debug") { | |
387 | sub(/-s[" ]?/, "%{rpmldflags} ", flags[1]) | |
388 | $0 = tmp[1] line[1] "LDFLAGS=" flags[1] "\"" | |
389 | for (i = 2; i < count; i++) | |
390 | $0 = $0 flags[i] "\"" | |
391 | } | |
392 | } | |
393 | } | |
394 | ||
395 | if (/CFLAGS=/) | |
396 | if (cflags("CFLAGS") == 0) | |
397 | next | |
398 | ||
399 | if (/CXXFLAGS=/) | |
400 | if (cflags("CXXFLAGS") == 0) | |
401 | next | |
402 | ||
403 | if (/^export /) { | |
404 | if (removed["LDFLAGS"]) | |
405 | sub(" LDFLAGS", "") | |
406 | if (removed["CFLAGS"]) | |
407 | sub(" CFLAGS", "") | |
408 | if (removed["CXXFLAGS"]) | |
409 | sub(" CXXFLAGS", "") | |
410 | # Is there still something? | |
411 | if (/^export[ ]*$/) | |
412 | next | |
413 | } | |
414 | ||
415 | # quote CC | |
416 | if (/CC=%{__cc} /) { | |
417 | sub("CC=%{__cc}", "CC=\"%{__cc}\"") | |
418 | } | |
419 | ||
420 | # use PLD Linux macros | |
421 | $0 = fixedsub("glib-gettextize --copy --force","%{__glib_gettextize}", $0); | |
422 | $0 = fixedsub("intltoolize --copy --force", "%{__intltoolize}", $0); | |
423 | $0 = fixedsub("automake --add-missing --copy", "%{__automake}", $0); | |
424 | $0 = fixedsub("automake -a --foreign --copy", "%{__automake}", $0); | |
425 | $0 = fixedsub("automake -a -c --foreign", "%{__automake}", $0); | |
426 | $0 = fixedsub("automake -a -c", "%{__automake}", $0); | |
427 | $0 = fixedsub("libtoolize --force --automake --copy", "%{__libtoolize}", $0); | |
428 | $0 = fixedsub("libtoolize -c -f --automake", "%{__libtoolize}", $0); | |
429 | ||
430 | sub(/^aclocal$/, "%{__aclocal}"); | |
431 | sub(/^autoheader$/, "%{__autoheader}"); | |
432 | sub(/^autoconf$/, "%{__autoconf}"); | |
433 | sub(/^automake$/, "%{__automake}"); | |
434 | sub(/^libtoolize$/, "%{__libtoolize}"); | |
435 | ||
436 | # atrpms | |
437 | $0 = fixedsub("%perl_configure", "%{__perl} Makefile.PL \\\n\tINSTALLDIRS=vendor", $0); | |
438 | $0 = fixedsub("%perl_makecheck", "%{?with_tests:%{__make} test}", $0); | |
439 | ||
440 | # alt linux | |
441 | $0 = fixedsub("%make_build", "%{__make}", $0); | |
442 | } | |
443 | ||
444 | ########## | |
445 | # %clean # | |
446 | ########## | |
447 | /^%clean/, (!/^%clean/ && $0 ~ SECTIONS) { | |
448 | did_clean = 1 | |
449 | ||
450 | use_macros() | |
451 | } | |
452 | ||
453 | ############ | |
454 | # %install # | |
455 | ############ | |
456 | /^%install/, (!/^%install/ && $0 ~ SECTIONS) { | |
457 | ||
458 | preamble = 0 | |
459 | ||
460 | # foreign rpms | |
461 | sub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT") | |
462 | sub("%buildroot", "$RPM_BUILD_ROOT"); | |
463 | sub("%{buildroot}", "$RPM_BUILD_ROOT"); | |
464 | ||
465 | if (/^[ \t]*rm([ \t]+-[rf]+)*[ \t]+(\${?RPM_BUILD_ROOT}?|%{?buildroot}?)/ && did_rmroot==0) { | |
466 | did_rmroot=1 | |
467 | print "rm -rf $RPM_BUILD_ROOT" | |
468 | next | |
469 | } | |
470 | ||
471 | if (!/^(#?[ \t]*)$/ && !/^%install/ && did_rmroot==0) { | |
472 | print "rm -rf $RPM_BUILD_ROOT" | |
473 | did_rmroot=1 | |
474 | } | |
475 | ||
476 | if (tmpdir) { | |
477 | buildroot = tmpdir "/" name "-" version "-root-" ENVIRON["USER"] | |
478 | gsub(buildroot, "$RPM_BUILD_ROOT") | |
479 | } | |
480 | ||
481 | if (!/%{_lib}/) { | |
482 | sub("\$RPM_BUILD_ROOT/%", "$RPM_BUILD_ROOT%") | |
483 | } | |
484 | ||
485 | use_macros() | |
486 | ||
487 | # 'install -d' instead 'mkdir -p' | |
488 | if (/mkdir -p/) | |
489 | sub(/mkdir -p/, "install -d") | |
490 | ||
491 | # cp -a already implies cp -r | |
492 | sub(/^cp -ar/, "cp -a") | |
493 | ||
494 | # No '-u root' or '-g root' for 'install' | |
495 | if (/^install/ && /-[ug][ \t]*root/) | |
496 | gsub(/-[ug][ \t]*root /, "") | |
497 | ||
498 | if (/^install/ && /-m[ \t]*[0-9]+/) | |
499 | gsub(/-m[ \t]*[0-9]+ /, "") | |
500 | ||
501 | # No lines contain 'chown' or 'chgrp' if owner/group is 'root' | |
502 | if (($1 ~ /chown/ && $2 ~ /root\.root/) || ($1 ~ /chgrp/ && $2 ~ /root/)) | |
503 | next | |
504 | ||
505 | # No lines contain 'chmod' if it sets the modes to '644' | |
506 | if ($1 ~ /chmod/ && $2 ~ /644/) | |
507 | next | |
508 | ||
509 | # atrpms | |
510 | $0 = fixedsub("%perl_makeinstall", "%{__make} pure_install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0); | |
511 | ||
512 | # alt linux | |
513 | $0 = fixedsub("%make_install DESTDIR=$RPM_BUILD_ROOT install", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0); | |
514 | } | |
515 | ||
516 | ########## | |
517 | # %files # | |
518 | ########## | |
519 | /^%files/, (!/^%files/ && $0 ~ SECTIONS) { | |
520 | preamble = 0 | |
521 | did_files = 1 | |
522 | ||
523 | if ($0 ~ /^%files/) | |
524 | defattr = 1 | |
525 | ||
526 | if (!use_files_macros()) { | |
527 | next | |
528 | } | |
529 | } | |
530 | ||
531 | ############## | |
532 | # %changelog # | |
533 | ############## | |
534 | /^%changelog/, (!/^%changelog/ && $0 ~ SECTIONS) { | |
535 | preamble = 0 | |
536 | has_changelog = 1 | |
537 | skip = 0 | |
538 | # There should be some CVS keywords on the first line of %changelog. | |
539 | if (boc == 3) { | |
540 | if ($0 !~ _cvsmailfeedback) { | |
541 | print "* %{date} " _cvsmailfeedback > changelog_file | |
542 | } else { | |
543 | skip = 1 | |
544 | } | |
545 | boc = 2 | |
546 | } | |
547 | if (boc == 2 && !skip) { | |
548 | if (!/All persons listed below/) { | |
549 | printf "All persons listed below can be reached at " > changelog_file | |
550 | print "<cvs_login>" _cvsmaildomain "\n" > changelog_file | |
551 | } else { | |
552 | skip = 1 | |
553 | } | |
554 | boc = 1 | |
555 | } | |
556 | if (boc == 1 && !skip) { | |
557 | if (!/^$/) { | |
558 | if (!/\$.*Log:.*\$/) { | |
559 | print "$" "Log:$" > changelog_file | |
560 | } | |
561 | boc = 0 | |
562 | } | |
563 | } | |
564 | # Define date macro. | |
565 | if (boc == 4) { | |
566 | if (date == 0) { | |
567 | printf "%%define date\t%%(echo `LC_ALL=\"C\"" > changelog_file | |
568 | print " date +\"%a %b %d %Y\"`)" > changelog_file | |
569 | date = 1 | |
570 | } | |
571 | boc = 3 | |
572 | } | |
573 | ||
574 | sub(/[ \t]+$/, ""); | |
575 | if (!/^%[a-z]+$/ || /changelog/) { | |
576 | # stop changelog if "real" changelog starts | |
577 | if (boc == 0 && /^\* /) { | |
578 | boc = -1 | |
579 | } | |
580 | if (boc == -1) { | |
581 | next; | |
582 | } | |
583 | print > changelog_file | |
584 | } else { | |
585 | ||
586 | } | |
587 | next | |
588 | } | |
589 | ||
590 | ########### | |
591 | # SCRIPTS # | |
592 | ########### | |
593 | /^%pre/, (!/^%pre/ && $0 ~ SECTIONS) { | |
594 | preamble = 0 | |
595 | ||
596 | if (gsub("/usr/sbin/useradd", "%useradd")) { | |
597 | sub(" 2> /dev/null \|\| :", ""); | |
598 | sub(" >/dev/null 2>&1 \|\|:", ""); | |
599 | } | |
600 | ||
601 | # %useradd and %groupadd may not be wrapped | |
602 | if (/%(useradd|groupadd).*\\$/) { | |
603 | a = $0; getline; | |
604 | sub(/^[\s\t]*/, ""); | |
605 | $0 = substr(a, 1, length(a) - 1) $0; | |
606 | } | |
607 | use_script_macros() | |
608 | } | |
609 | ||
610 | /^%post/, (!/^%post/ && $0 ~ SECTIONS) { | |
611 | preamble = 0 | |
612 | use_macros() | |
613 | } | |
614 | /^%preun/, (!/^%preun/ && $0 ~ SECTIONS) { | |
615 | preamble = 0 | |
616 | use_macros() | |
617 | } | |
618 | /^%postun/, (!/^%postun/ && $0 ~ SECTIONS) { | |
619 | preamble = 0 | |
620 | use_script_macros() | |
621 | } | |
622 | /^%triggerin/, (!/^%triggerin/ && $0 ~ SECTIONS) { | |
623 | preamble = 0 | |
624 | use_script_macros() | |
625 | } | |
626 | /^%triggerun/, (!/^%triggerun/ && $0 ~ SECTIONS) { | |
627 | preamble = 0 | |
628 | use_script_macros() | |
629 | } | |
630 | /^%triggerpostun/, (!/^%triggerpostun/ && $0 ~ SECTIONS) { | |
631 | preamble = 0 | |
632 | use_script_macros() | |
633 | } | |
634 | /^%pretrans/, (!/^%pretrans/ && $0 ~ SECTIONS) { | |
635 | preamble = 0 | |
636 | use_script_macros() | |
637 | } | |
638 | /^%posttrans/, (!/^%posttrans/ && $0 ~ SECTIONS) { | |
639 | preamble = 0 | |
640 | use_script_macros() | |
641 | } | |
642 | /^%verifyscript/, (!/^%verifyscript/ && $0 ~ SECTIONS) { | |
643 | preamble = 0 | |
644 | use_script_macros() | |
645 | } | |
646 | /^%check/, (!/^%check/ && $0 ~ SECTIONS) { | |
647 | preamble = 0 | |
648 | use_script_macros() | |
649 | } | |
650 | ||
651 | ############# | |
652 | # PREAMBLES # | |
653 | ############# | |
654 | preamble == 1 { | |
655 | # There should not be a space after the name of field | |
656 | # and before the colon. | |
657 | sub(/[ \t]*:/, ":") | |
658 | ||
659 | if (/^%perl_module_wo_prefix/) { | |
660 | name = $2 | |
661 | version = $3 | |
662 | release = "0." fixedsub(".%{disttag}.at", "", $4) | |
663 | } | |
664 | ||
665 | field = tolower($1) | |
666 | if (field ~ /summary:/ && !/etc\.$/ && !/Inc\.$/) { | |
667 | sub(/\.$/, "", $0); | |
668 | } | |
669 | if (field ~ /group(\([^)]+\)):/) | |
670 | next | |
671 | if (field ~ /group:/) { | |
672 | format_preamble() | |
673 | group = $0; | |
674 | sub(/^[^ \t]*[ \t]*/, "", group); | |
675 | group = replace_groupnames(group); | |
676 | $0 = "Group:\t\t" group | |
677 | ||
678 | if (group ~ /^X11/ && x11 == 0) # Is it X11 application? | |
679 | x11 = 1 | |
680 | ||
681 | byl_plik_z_groupmi = 0 | |
682 | byl_opis_grupy = 0 | |
683 | while ((getline linia_grup < groups_file) > 0) { | |
684 | byl_plik_z_groupmi = 1 | |
685 | if (linia_grup == group) { | |
686 | byl_opis_grupy = 1 | |
687 | break | |
688 | } | |
689 | } | |
690 | ||
691 | if (!byl_plik_z_groupmi) | |
692 | print "######\t\t" groups_file ": no such file" | |
693 | else if (!byl_opis_grupy) | |
694 | print "######\t\t" "Unknown group!" | |
695 | ||
696 | close(groups_file) | |
697 | did_groups = 1 | |
698 | } | |
699 | ||
700 | if (field ~ /prereq:/) { | |
701 | sub(/Pre[Rr]eq:/, "Requires:", $1); | |
702 | } | |
703 | ||
704 | # split (build)requires, obsoletes on commas | |
705 | if (field ~ /(obsoletes|requires|provides|conflicts|suggests):/ && NF > 2) { | |
706 | value = substr($0, index($0, $2)); | |
707 | $0 = format_requires($1, value); | |
708 | } | |
709 | ||
710 | # BR: tar (and others) is to common (rpm-build requires it) | |
711 | if (field ~ /^buildrequires:/) { | |
712 | l = substr($0, index($0, $2)); | |
713 | if (l == "awk" || | |
714 | l == "binutils" || | |
715 | l == "bzip2" || | |
716 | l == "cpio" || | |
717 | l == "diffutils" || | |
718 | l == "elfutils" || | |
719 | l == "fileutils" || | |
720 | l == "findutils" || | |
721 | l == "glibc-devel" || | |
722 | l == "grep" || | |
723 | l == "gzip" || | |
724 | l == "make" || | |
725 | l == "patch" || | |
726 | l == "sed" || | |
727 | l == "sh-utils" || | |
728 | l == "tar" || | |
729 | l == "textutils") { | |
730 | next | |
731 | } | |
732 | ||
733 | replace_requires(); | |
734 | } | |
735 | ||
736 | if (field ~ /^requires:/ || field ~ /^requires\(/) { | |
737 | replace_requires(); | |
738 | } | |
739 | ||
740 | ||
741 | # obsolete/unwanted tags | |
742 | if (field ~ /vendor:|packager:|distribution:|docdir:|prefix:|icon:|author:|author-email:|metadata-version:/) { | |
743 | next | |
744 | } | |
745 | ||
746 | if (field ~ /buildroot:/) { | |
747 | $0 = $1 "%{tmpdir}/%{name}-%{version}-root-%(id -u -n)" | |
748 | did_build_root = 1 | |
749 | } | |
750 | ||
751 | # Use "License" instead of "Copyright" if it is (L)GPL or BSD | |
752 | if (field ~ /copyright:/ && $2 ~ /GPL|BSD/) { | |
753 | $1 = "License:" | |
754 | } | |
755 | ||
756 | # ease updating from debian .dsc | |
757 | if (field ~ /homepage:/) { | |
758 | $1 = "URL:" | |
759 | } | |
760 | ||
761 | # suse | |
762 | if (field ~ /recommends:/) { | |
763 | $1 = "Suggests:" | |
764 | } | |
765 | ||
766 | if ($3 == "==" && $1 !~ /%/) { | |
767 | $3 = "=" | |
768 | } | |
769 | ||
770 | if (field ~ /license:/) { | |
771 | l = substr($0, index($0, $2)); | |
772 | if (l == "Python Software Foundation License") { | |
773 | l = "PSF" | |
774 | } | |
775 | 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") { | |
776 | l = "Apache v2.0" | |
777 | } | |
778 | if (l == "Apache Group License" || l == "Apache Software License" || l == "Apache License") { | |
779 | l = "Apache" | |
780 | } | |
781 | if (l == "Apache-style License" || l == "Apache-style Software License") { | |
782 | l = "Apache-like" | |
783 | } | |
784 | if (l == "Apache Software License 1.1" || l == "Apache 1.1") { | |
785 | l = "Apache v1.1" | |
786 | } | |
787 | if (l == "GPLv2") { | |
788 | l = "GPL v2" | |
789 | } | |
790 | if (l == "GPLv2+") { | |
791 | l = "GPL v2+" | |
792 | } | |
793 | if (l == "GPL v2 or later") { | |
794 | l = "GPL v2+" | |
795 | } | |
796 | if (l == "LGPL v2.0 only") { | |
797 | l = "LGPL v2" | |
798 | } | |
799 | if (l == "LGPLv2+") { | |
800 | l = "LGPL v2+" | |
801 | } | |
802 | if (l == "GPLv3") { | |
803 | l = "GPL v3" | |
804 | } | |
805 | if (l == "GPLv3+") { | |
806 | l = "GPL v3+" | |
807 | } | |
808 | if (l == "MPLv1.1") { | |
809 | l = "MPL v1.1" | |
810 | } | |
811 | $0 = "License:\t" l; | |
812 | } | |
813 | ||
814 | ||
815 | if (field ~ /name:/) { | |
816 | if ($2 == "%{name}" && name) { | |
817 | $2 = name | |
818 | } | |
819 | name = $2 | |
820 | name_seen = 1; | |
821 | } | |
822 | ||
823 | if (field ~ /version:/) { | |
824 | if ($2 == "%{version}" && version) { | |
825 | $2 = version | |
826 | } | |
827 | version = $2 | |
828 | version_seen = 1; | |
829 | } | |
830 | ||
831 | if (field ~ /release:/) { | |
832 | if ($2 == "%{release}" && release) { | |
833 | $2 = release | |
834 | } | |
835 | sub(/%atrelease /, "0.", $0) | |
836 | release = $2 | |
837 | release_seen = 1; | |
838 | } | |
839 | ||
840 | ||
841 | if (field ~ /serial:/) | |
842 | $1 = "Epoch:" | |
843 | ||
844 | if (field ~ /home-page:/) | |
845 | $1 = "URL:" | |
846 | ||
847 | # proper caps | |
848 | if (field ~ /^url:$/) | |
849 | $1 = "URL:" | |
850 | ||
851 | if (field ~ /^patch/) | |
852 | $1 = "Patch" substr(field, 6); | |
853 | ||
854 | if (field ~ /^description:$/) | |
855 | $1 = "\n%description\n" | |
856 | ||
857 | # Use %{name} and %{version} in the filenames in "Source:" | |
858 | if (field ~ /^source/ || field ~ /patch/) { | |
859 | n = split($2, url, /\//) | |
860 | if (url[n] ~ /\.gz$/) { | |
861 | url[n+1] = ".gz" url[n+1] | |
862 | sub(/\.gz$/,"",url[n]) | |
863 | } | |
864 | if (url[n] ~ /\.zip$/) { | |
865 | url[n+1] = ".zip" url[n+1] | |
866 | sub(/\.zip$/,"",url[n]) | |
867 | } | |
868 | if (url[n] ~ /\.tar$/) { | |
869 | url[n+1] = ".tar" url[n+1] | |
870 | sub(/\.tar$/,"",url[n]) | |
871 | } | |
872 | if (url[n] ~ /\.patch$/) { | |
873 | url[n+1] = ".patch" url[n+1] | |
874 | sub(/\.patch$/,"",url[n]) | |
875 | } | |
876 | if (url[n] ~ /\.bz2$/) { | |
877 | url[n+1] = ".bz2" url[n+1] | |
878 | sub(/\.bz2$/,"",url[n]) | |
879 | } | |
880 | if (url[n] ~ /\.logrotate$/) { | |
881 | url[n+1] = ".logrotate" url[n+1] | |
882 | sub(/\.logrotate$/,"",url[n]) | |
883 | } | |
884 | if (url[n] ~ /\.pamd$/) { | |
885 | url[n+1] = ".pamd" url[n+1] | |
886 | sub(/\.pamd$/,"",url[n]) | |
887 | } | |
888 | ||
889 | # allow %{name} only in last url component | |
890 | s = "" | |
891 | for (i = 1; i <= n; i++) { | |
892 | url[i] = fixedsub("%{name}", name, url[i]) | |
893 | if (s) { | |
894 | s = s "/" url[i] | |
895 | } else { | |
896 | s = url[i] | |
897 | } | |
898 | } | |
899 | $2 = s url[n+1] | |
900 | ||
901 | filename = url[n] | |
902 | if (name) { | |
903 | url[n] = fixedsub(name, "%{name}", url[n]) | |
904 | } | |
905 | if (field ~ /source/) { | |
906 | if (version) { | |
907 | url[n] = fixedsub(version, "%{version}", url[n]) | |
908 | } | |
909 | if (_beta) { | |
910 | url[n] = fixedsub(_beta, "%{_beta}", url[n]) | |
911 | } | |
912 | if (_rc) { | |
913 | url[n] = fixedsub(_rc, "%{_rc}", url[n]) | |
914 | } | |
915 | if (_pre) { | |
916 | url[n] = fixedsub(_pre, "%{_pre}", url[n]) | |
917 | } | |
918 | if (_snap) { | |
919 | url[n] = fixedsub(_snap, "%{_snap}", url[n]) | |
920 | } | |
921 | if (subver) { | |
922 | url[n] = fixedsub(subver, "%{subver}", url[n]) | |
923 | } | |
924 | } | |
925 | # assigning to $2 kills preamble formatting | |
926 | $2 = fixedsub(filename, url[n], $2) | |
927 | ||
928 | $2 = unify_url($2) | |
929 | } | |
930 | ||
931 | ||
932 | if (field ~ /^source:/) | |
933 | $1 = "Source0:" | |
934 | ||
935 | if (field ~ /^patch:/) | |
936 | $1 = "Patch0:" | |
937 | ||
938 | kill_preamble_macros(); | |
939 | format_preamble() | |
940 | ||
941 | if (field ~ /requires/) { | |
942 | # atrpms | |
943 | $0 = fixedsub("%{eversion}", "%{epoch}:%{version}-%{release}", $0); | |
944 | } | |
945 | } | |
946 | ||
947 | /^%bcond_/ { | |
948 | # do nothing | |
949 | ||
950 | next | |
951 | } | |
952 | ||
953 | # sort BR/R! | |
954 | # | |
955 | # NOTES: | |
956 | # - mixing BR/R and anything else confuses this (all will be sorted together) | |
957 | # so don't do that. | |
958 | # - comments leading the BR/R can not be associated, | |
959 | # so don't adapterize when the BR/R are mixed with comments | |
960 | ENVIRON["SKIP_SORTBR"] != 1 && preamble == 1 && $0 ~ PREAMBLE_TAGS ":", $0 ~ PREAMBLE_TAGS ":"{ | |
961 | if ($1 ~ /Pre[Rr]eq:/) { | |
962 | sub(/Pre[Rr]eq:/, "Requires:", $1); | |
963 | } | |
964 | if ($1 == "BR:" ) { | |
965 | $1 = "BuildRequires:" | |
966 | } | |
967 | if ($1 == "R:" ) { | |
968 | $1 = "Requires:" | |
969 | } | |
970 | format_preamble() | |
971 | # kill_preamble_macros(); # breaks tabbing | |
972 | ||
973 | b_idx++; | |
974 | l = substr($0, index($0, $2)); | |
975 | b_ktmp = b_makekey($1, l); | |
976 | b_key[b_idx] = b_ktmp; | |
977 | b_val[b_ktmp] = $0; | |
978 | ||
979 | next; | |
980 | } | |
981 | ||
982 | preamble == 1 { | |
983 | if (b_idx > 0) { | |
984 | isort(b_key, b_idx); | |
985 | for (i = 1; i <= b_idx; i++) { | |
986 | v = b_val[b_key[i]]; | |
987 | sub(/[ \t]+$/, "", v); | |
988 | print "" v; | |
989 | } | |
990 | b_idx = 0 | |
991 | } | |
992 | } | |
993 | ||
994 | # main() ;-) | |
995 | { | |
996 | preamble = 1 | |
997 | ||
998 | sub(/[ \t]+$/, "") | |
999 | ||
1000 | ||
1001 | if (name_seen == 0 && name) { | |
1002 | print "Name:\t\t" name | |
1003 | name_seen = 1 | |
1004 | } | |
1005 | ||
1006 | if (version_seen == 0 && version) { | |
1007 | print "Version:\t" version | |
1008 | version_seen = 1 | |
1009 | } | |
1010 | ||
1011 | if (release_seen == 0 && release) { | |
1012 | print "Release:\t" release | |
1013 | release_seen = 1 | |
1014 | } | |
1015 | ||
1016 | if (did_build_root == 0) { | |
1017 | # print "BuildRoot:\t%{tmpdir}/%{name}-%{version}-root-%(id -u -n)" | |
1018 | did_build_root = 1 | |
1019 | } | |
1020 | if (did_groups == 0) { | |
1021 | # print "Group:\t\tunknown" | |
1022 | did_groups = 1 | |
1023 | } | |
1024 | } | |
1025 | ||
1026 | ||
1027 | END { | |
1028 | if (do_not_touch_anything) { | |
1029 | exit(rc) | |
1030 | } | |
1031 | ||
1032 | # TODO: need to output these in proper place | |
1033 | if (BR_count > 0) { | |
1034 | for (i = 0; i <= BR_count; i++) { | |
1035 | print BR[i]; | |
1036 | } | |
1037 | } | |
1038 | ||
1039 | close(changelog_file) | |
1040 | while ((getline < changelog_file) > 0) | |
1041 | ||
1042 | system("rm -f " changelog_file) | |
1043 | ||
1044 | if (did_clean == 0) { | |
1045 | print "" | |
1046 | print "%clean" | |
1047 | print "rm -rf $RPM_BUILD_ROOT" | |
1048 | } | |
1049 | ||
1050 | if (date == 0) { | |
1051 | print "" | |
1052 | print "%define date\t%(echo `LC_ALL=\"C\" date +\"%a %b %d %Y\"`)" | |
1053 | } | |
1054 | ||
1055 | if (has_changelog == 0) { | |
1056 | print "%changelog" | |
1057 | } | |
1058 | ||
1059 | if (boc > 2) { | |
1060 | print "* %{date} PLD Team <feedback@pld-linux.org>" | |
1061 | } | |
1062 | if (boc > 1) { | |
1063 | printf "All persons listed below can be reached at " | |
1064 | print "<cvs_login>@pld-linux.org\n" | |
1065 | } | |
1066 | if (boc > 0) { | |
1067 | print "$" "Log:$" | |
1068 | } | |
1069 | } | |
1070 | ||
1071 | # substitutes fixed strings (not regexps) | |
1072 | function fixedsub(s1,s2,t, ind) { | |
1073 | if (ind = index(t,s1)) | |
1074 | t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1)) | |
1075 | return t | |
1076 | } | |
1077 | ||
1078 | # replace s with s2 if it equals to s1 | |
1079 | function replace(s, s1, s2) { | |
1080 | if (s == s1) { | |
1081 | return s2; | |
1082 | } else { | |
1083 | return s; | |
1084 | } | |
1085 | } | |
1086 | ||
1087 | # There should be one or two tabs after the colon. | |
1088 | function format_preamble() | |
1089 | { | |
1090 | if (/^#/ || /^%bcond_with/) { | |
1091 | return; | |
1092 | } | |
1093 | sub(/:[ \t]*/, ":") | |
1094 | if (match($0, /[A-Za-z0-9(),#_ \t.-]+[ \t]*:[ \t]*/) == 1) { | |
1095 | if (RLENGTH < 8) { | |
1096 | sub(/:/, ":\t\t") | |
1097 | } else { | |
1098 | sub(/:/, ":\t") | |
1099 | } | |
1100 | } | |
1101 | } | |
1102 | ||
1103 | # Replace directly specified directories with macros | |
1104 | function use_macros() | |
1105 | { | |
1106 | # -m, --skip-macros, --no-macros -- skip macros subst | |
1107 | if (ENVIRON["SKIP_MACROS"]) { | |
1108 | return | |
1109 | } | |
1110 | ||
1111 | # leave inline sed lines alone | |
1112 | if (/(%{__sed}|sed) -i -e/) { | |
1113 | return; | |
1114 | } | |
1115 | ||
1116 | sub("%{_defaultdocdir}", "%{_docdir}"); | |
1117 | sub("%{_bindir}/perl", "%{__perl}"); | |
1118 | sub("%{_bindir}/python", "%{__python}"); | |
1119 | ||
1120 | gsub(infodir, "%{_infodir}") | |
1121 | ||
1122 | gsub(perl_sitearch, "%{perl_sitearch}") | |
1123 | gsub(perl_archlib, "%{perl_archlib}") | |
1124 | gsub(perl_privlib, "%{perl_privlib}") | |
1125 | gsub(perl_vendorlib, "%{perl_vendorlib}") | |
1126 | gsub(perl_vendorarch, "%{perl_vendorarch}") | |
1127 | gsub(perl_sitelib, "%{perl_sitelib}") | |
1128 | ||
1129 | gsub(py_sitescriptdir, "%{py_sitescriptdir}") | |
1130 | gsub(py_sitedir, "%{py_sitedir}") | |
1131 | gsub(py_scriptdir, "%{py_scriptdir}") | |
1132 | ||
1133 | gsub(py3_sitescriptdir, "%{py3_sitescriptdir}") | |
1134 | gsub(py3_sitedir, "%{py3_sitedir}") | |
1135 | gsub(py3_scriptdir, "%{py3_scriptdir}") | |
1136 | ||
1137 | gsub(ruby_archdir, "%{ruby_archdir}") | |
1138 | gsub(ruby_ridir, "%{ruby_ridir}") | |
1139 | gsub(ruby_rubylibdir, "%{ruby_rubylibdir}") | |
1140 | gsub(ruby_sitearchdir, "%{ruby_sitearchdir}") | |
1141 | gsub(ruby_sitelibdir, "%{ruby_sitelibdir}") | |
1142 | gsub(ruby_rdocdir, "%{ruby_rdocdir}") | |
1143 | ||
1144 | gsub("%{_datadir}/applications", "%{_desktopdir}") | |
1145 | gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}") | |
1146 | gsub("%{_datadir}/java", "%{_javadir}") | |
1147 | ||
1148 | gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}") | |
1149 | gsub(pkgconfigdir, "%{_pkgconfigdir}") | |
1150 | ||
1151 | gsub("%{_datadir}/pkgconfig", "%{_npkgconfigdir}") | |
1152 | gsub(npkgconfigdir, "%{_npkgconfigdir}") | |
1153 | ||
1154 | gsub(libdir, "%{_libdir}") | |
1155 | gsub(javadir, "%{_javadir}") | |
1156 | ||
1157 | gsub(bindir, "%{_bindir}") | |
1158 | gsub("%{prefix}/bin", "%{_bindir}") | |
1159 | if (prefix"/bin" == bindir) | |
1160 | gsub("%{_prefix}/bin", "%{_bindir}") | |
1161 | ||
1162 | for (c = 1; c <= NF; c++) { | |
1163 | if ($c ~ sbindir "/fix-info-dir") | |
1164 | continue; | |
1165 | if ($c ~ sbindir "/webapp") | |
1166 | continue; | |
1167 | if ($c ~ sbindir "/ldconfig") | |
1168 | continue; | |
1169 | if ($c ~ sbindir "/chsh") | |
1170 | continue; | |
1171 | if ($c ~ sbindir "/usermod") | |
1172 | continue; | |
1173 | if ($c ~ sbindir "/chkconfig") | |
1174 | continue; | |
1175 | if ($c ~ sbindir "/installzope(product|3package)") | |
1176 | continue; | |
1177 | gsub(sbindir, "%{_sbindir}", $c) | |
1178 | } | |
1179 | ||
1180 | gsub("%{prefix}/sbin", "%{_sbindir}") | |
1181 | if (prefix"/sbin" == sbindir) { | |
1182 | gsub("%{_prefix}/sbin", "%{_sbindir}") | |
1183 | } | |
1184 | ||
1185 | for (c = 1; c <= NF; c++) { | |
1186 | if ($c ~ sysconfdir "/{?cron.") | |
1187 | continue; | |
1188 | if ($c ~ sysconfdir "/{?crontab.d") | |
1189 | continue; | |
1190 | if ($c ~ sysconfdir "/{?env.d") | |
1191 | continue; | |
1192 | if ($c ~ sysconfdir "/{?modprobe.(d|conf)") | |
1193 | continue; | |
1194 | if ($c ~ sysconfdir "/{?udev") | |
1195 | continue; | |
1196 | if ($c ~ sysconfdir "/{?hotplug") | |
1197 | continue; | |
1198 | if ($c ~ sysconfdir "/{?logrotate.d") | |
1199 | continue; | |
1200 | if ($c ~ sysconfdir "/{?pam.d") | |
1201 | continue; | |
1202 | if ($c ~ sysconfdir "/{?profile.d") | |
1203 | continue; | |
1204 | if ($c ~ sysconfdir "/{?rc.d") | |
1205 | continue; | |
1206 | if ($c ~ sysconfdir "/{?security") | |
1207 | continue; | |
1208 | if ($c ~ sysconfdir "/{?skel") | |
1209 | continue; | |
1210 | if ($c ~ sysconfdir "/{?sysconfig") | |
1211 | continue; | |
1212 | if ($c ~ sysconfdir "/{?shrc.d") | |
1213 | continue; | |
1214 | if ($c ~ sysconfdir "/{?certs") | |
1215 | continue; | |
1216 | if ($c ~ sysconfdir "/{?X11") | |
1217 | continue; | |
1218 | if ($c ~ sysconfdir "/{?ld.so.conf.d") | |
1219 | continue; | |
1220 | if ($c ~ sysconfdir "/{?rpm") | |
1221 | continue; | |
1222 | if ($c ~ sysconfdir "/{?bash_completion.d") | |
1223 | continue; | |
1224 | if ($c ~ sysconfdir "/{?samba") | |
1225 | continue; | |
1226 | if ($c ~ sysconfdir "/shells") | |
1227 | continue; | |
1228 | if ($c ~ sysconfdir "/ppp") | |
1229 | continue; | |
1230 | if ($c ~ sysconfdir "/dbus-1") | |
1231 | continue; | |
1232 | if ($c ~ sysconfdir "/tmpwatch") | |
1233 | continue; | |
1234 | if ($c ~ sysconfdir "/acpi") | |
1235 | continue; | |
1236 | if ($c ~ sysconfdir "/apm") | |
1237 | continue; | |
1238 | gsub(sysconfdir, "%{_sysconfdir}", $c) | |
1239 | } | |
1240 | ||
1241 | gsub(docdir, "%{_docdir}") | |
1242 | ||
1243 | gsub(kdedocdir, "%{_kdedocdir}") | |
1244 | ||
1245 | gsub(gtkdocdir, "%{_gtkdocdir}") | |
1246 | gsub("%{_docdir}/gtk-doc/html", "%{_gtkdocdir}") | |
1247 | ||
1248 | gsub(php_pear_dir, "%{php_pear_dir}") | |
1249 | gsub(php_data_dir, "%{php_data_dir}") | |
1250 | ||
1251 | for (c = 1; c <= NF; c++) { | |
1252 | if ($c ~ datadir "/automake") | |
1253 | continue; | |
1254 | if ($c ~ datadir "/unsermake") | |
1255 | continue; | |
1256 | if ($c ~ datadir "/file/magic.mime") | |
1257 | continue; | |
1258 | gsub(datadir, "%{_datadir}", $c) | |
1259 | } | |
1260 | ||
1261 | gsub("%{prefix}/share", "%{_datadir}") | |
1262 | if (prefix"/share" == datadir) | |
1263 | gsub("%{_prefix}/share", "%{_datadir}") | |
1264 | ||
1265 | # CFLAGS="-I/usr/include/ncurses is usually correct. | |
1266 | if (!/-I\/usr\/include/) { | |
1267 | gsub(includedir, "%{_includedir}") | |
1268 | } | |
1269 | ||
1270 | gsub("%{prefix}/include", "%{_includedir}") | |
1271 | if (prefix"/include" == includedir) { | |
1272 | gsub("%{_prefix}/include", "%{_includedir}") | |
1273 | } | |
1274 | ||
1275 | gsub(mandir, "%{_mandir}") | |
1276 | if ($0 !~ "%{_datadir}/manual") { | |
1277 | gsub("%{_datadir}/man", "%{_mandir}") | |
1278 | } | |
1279 | gsub("%{_prefix}/share/man", "%{_mandir}") | |
1280 | gsub("%{prefix}/share/man", "%{_mandir}") | |
1281 | gsub("%{prefix}/man", "%{_mandir}") | |
1282 | gsub("%{_prefix}/man", "%{_mandir}") | |
1283 | ||
1284 | gsub(infodir, "%{_infodir}") | |
1285 | gsub("%{prefix}/info", "%{_infodir}") | |
1286 | gsub("%{_prefix}/info", "%{_infodir}") | |
1287 | ||
1288 | if (prefix !~ "/X11R6") { | |
1289 | gsub("%{_datadir}/aclocal", "%{_aclocaldir}") | |
1290 | } | |
1291 | ||
1292 | gsub(examplesdir, "%{_examplesdir}") | |
1293 | ||
1294 | if (prefix != "/") { | |
1295 | # leave --with-foo=/usr alone | |
1296 | if ($0 !~ "--with.*=.*" prefix) { | |
1297 | for (c = 1; c <= NF; c++) { | |
1298 | if ($c ~ prefix "/sbin/fix-info-dir") | |
1299 | continue; | |
1300 | if ($c ~ prefix "/sbin/webapp") | |
1301 | continue; | |
1302 | if ($c ~ prefix "/sbin/chsh") | |
1303 | continue; | |
1304 | if ($c ~ prefix "/sbin/usermod") | |
1305 | continue; | |
1306 | if ($c ~ prefix "/sbin/installzope(product|3package)") | |
1307 | continue; | |
1308 | if ($c ~ prefix "/share/automake") | |
1309 | continue; | |
1310 | if ($c ~ prefix "/share/unsermake") | |
1311 | continue; | |
1312 | if ($c ~ prefix "/lib/sendmail") | |
1313 | continue; | |
1314 | if ($c ~ prefix "/lib/pkgconfig") | |
1315 | continue; | |
1316 | ||
1317 | # CFLAGS="-I/usr..." is usually correct. | |
1318 | if (/-I\/usr/) | |
1319 | continue; | |
1320 | # same for LDFLAGS="-L/usr..." | |
1321 | if (/-L\/usr/) | |
1322 | continue; | |
1323 | ||
1324 | gsub(prefix, "%{_prefix}", $c) | |
1325 | } | |
1326 | } | |
1327 | gsub("%{prefix}", "%{_prefix}") | |
1328 | } | |
1329 | ||
1330 | # replace back | |
1331 | gsub("%{_includedir}/ncurses", "/usr/include/ncurses") | |
1332 | gsub("%{_includedir}/freetype", "/usr/include/freetype") | |
1333 | ||
1334 | gsub("%{PACKAGE_VERSION}", "%{version}") | |
1335 | gsub("%{PACKAGE_NAME}", "%{name}") | |
1336 | ||
1337 | gsub("^make$", "%{__make}") | |
1338 | gsub("^make ", "%{__make} ") | |
1339 | gsub("^gcc ", "%{__cc} ") | |
1340 | gsub("^rm --interactive=never ", "%{__rm} ") | |
1341 | ||
1342 | # fedora | |
1343 | gsub("%{ruby_sitearch}", "%{ruby_sitearchdir}") | |
1344 | gsub("%{python_sitearch}", "%{py_sitedir}") | |
1345 | gsub("%{python_sitelib}", "%{py_sitescriptdir}") | |
1346 | ||
1347 | # alt linux | |
1348 | gsub("%_man1dir", "%{_mandir}/man1") | |
1349 | ||
1350 | # mandrake specs | |
1351 | gsub("^%make$", "%{__make}") | |
1352 | gsub("^%make ", "%{__make} ") | |
1353 | gsub("^%makeinstall_std", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") | |
1354 | gsub("^%{makeinstall}", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") | |
1355 | gsub("^%makeinstall", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") | |
1356 | gsub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT") | |
1357 | gsub("^%{__install}", "install") | |
1358 | gsub("%optflags", "%{rpmcflags}") | |
1359 | gsub("%{compat_perl_vendorarch}", "%{perl_vendorarch}") | |
1360 | ||
1361 | gsub("^%{__make} install DESTDIR=\$RPM_BUILD_ROOT", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT") | |
1362 | gsub("^fix-info-dir$", "[ ! -x /usr/sbin/fix-info-dir ] || /usr/sbin/fix-info-dir -c %{_infodir} >/dev/null 2>\\&1") | |
1363 | $0 = fixedsub("%buildroot", "$RPM_BUILD_ROOT", $0) | |
1364 | $0 = fixedsub("%{buildroot}", "$RPM_BUILD_ROOT", $0) | |
1365 | $0 = fixedsub("CXXFLAGS=%{rpmcflags} %configure", "CXXFLAGS=%{rpmcflags}\n%configure", $0); | |
1366 | $0 = fixedsub("%__install", "install", $0); | |
1367 | ||
1368 | # split configure line to multiple lines | |
1369 | if (/%configure +$/) { | |
1370 | sub( / +$/, "" ); | |
1371 | } else if (/%configure / && !/\\$/) { | |
1372 | $0 = format_configure($0); | |
1373 | } | |
1374 | ||
1375 | gsub("%_bindir", "%{_bindir}") | |
1376 | gsub("%_datadir", "%{_datadir}") | |
1377 | gsub("%_iconsdir", "%{_iconsdir}") | |
1378 | gsub("%_sbindir", "%{_sbindir}") | |
1379 | gsub("%_mandir", "%{_mandir}") | |
1380 | gsub("%name", "%{name}") | |
1381 | gsub(/%__rm/, "rm"); | |
1382 | gsub(/%__mkdir_p/, "install -d"); | |
1383 | gsub(/%__cp/, "cp"); | |
1384 | gsub(/%__ln_s/, "ln -s"); | |
1385 | gsub(/%__sed/, "%{__sed}"); | |
1386 | gsub(/%__cat/, "cat"); | |
1387 | gsub(/%__chmod/, "chmod"); | |
1388 | ||
1389 | gsub("/usr/src/linux", "%{_kernelsrcdir}") | |
1390 | gsub("%{_prefix}/src/linux", "%{_kernelsrcdir}") | |
1391 | ||
1392 | if (/^ant / || /^%{ant}/) { | |
1393 | sub(/^ant/, "%ant") | |
1394 | sub(/^%{ant}/, "%ant") | |
1395 | add_br("BuildRequires: jpackage-utils"); | |
1396 | add_br("BuildRequires: rpmbuild(macros) >= 1.300"); | |
1397 | } | |
1398 | ||
1399 | $0 = fixedsub("%(%{__cc} -dumpversion)", "%{cc_version}", $0); | |
1400 | $0 = fixedsub("%(%{__cxx} -dumpversion)", "%{cxx_version}", $0); | |
1401 | ||
1402 | # kill the _class and _subclass pear macros | |
1403 | if (pear_class) { | |
1404 | gsub("%{_class}", pear_class); | |
1405 | } | |
1406 | if (pear_subclass) { | |
1407 | gsub("%{_subclass}", pear_subclass); | |
1408 | } | |
1409 | ||
1410 | } | |
1411 | ||
1412 | function format_configure(line, n, a, s) { | |
1413 | n = split(line, a, / /); | |
1414 | s = a[1] " \\\n"; | |
1415 | for (i = 2; i <= n; i++) { | |
1416 | s = s "\t" a[i] " \\\n" | |
1417 | } | |
1418 | return s | |
1419 | } | |
1420 | ||
1421 | ||
1422 | # insertion sort of A[1..n] | |
1423 | # copied from mawk manual | |
1424 | function isort(A,n, i,j,hold) { | |
1425 | for (i = 2; i <= n; i++) { | |
1426 | hold = A[j = i] | |
1427 | while (A[j-1] > hold) { | |
1428 | j-- ; A[j+1] = A[j] | |
1429 | } | |
1430 | A[j] = hold | |
1431 | } | |
1432 | # sentinel A[0] = "" will be created if needed | |
1433 | } | |
1434 | ||
1435 | ||
1436 | function use_files_macros( i, n, t, a, l) | |
1437 | { | |
1438 | use_macros() | |
1439 | ||
1440 | # skip comments | |
1441 | if (/^#/) { | |
1442 | return 1; | |
1443 | } | |
1444 | ||
1445 | sub("^%doc %{_mandir}", "%{_mandir}") | |
1446 | ||
1447 | gsub("^%{_sbindir}", "%attr(755,root,root) %{_sbindir}") | |
1448 | gsub("^%{_bindir}", "%attr(755,root,root) %{_bindir}") | |
1449 | ||
1450 | # uid/gid nobody is not valid in %files | |
1451 | if (/%attr([^)]*nobody[^)]*)/ && !/FIXME/) { | |
1452 | $0 = $0 " # FIXME nobody user/group can't own files! -adapter.awk" | |
1453 | } | |
1454 | ||
1455 | # s[gu]id programs with globs are evil | |
1456 | if (/%attr\([246]...,.*\*/ && !/FIXME/) { | |
1457 | $0 = $0 " # FIXME no globs for suid/sgid files" | |
1458 | } | |
1459 | ||
1460 | # replace back | |
1461 | gsub("%{_sysconfdir}/cron\.d", "/etc/cron.d") | |
1462 | gsub("%{_sysconfdir}/crontab\.d", "/etc/crontab.d") | |
1463 | gsub("%{_sysconfdir}/logrotate\.d", "/etc/logrotate.d") | |
1464 | gsub("%{_sysconfdir}/pam\.d", "/etc/pam.d") | |
1465 | gsub("%{_sysconfdir}/profile\.d", "/etc/profile.d") | |
1466 | gsub("%{_sysconfdir}/rc\.d", "/etc/rc.d") | |
1467 | gsub("%{_sysconfdir}/security", "/etc/security") | |
1468 | gsub("%{_sysconfdir}/skel", "/etc/skel") | |
1469 | gsub("%{_sysconfdir}/sysconfig", "/etc/sysconfig") | |
1470 | gsub("%{_sysconfdir}/certs", "/etc/certs") | |
1471 | gsub("%{_sysconfdir}/init.d", "/etc/init.d") | |
1472 | gsub("%{_sysconfdir}/dbus-1", "/etc/dbus-1") | |
1473 | gsub("%{_sysconfdir}/pki", "/etc/pki") | |
1474 | gsub("%{_sysconfdir}/tmpwatch", "/etc/tmpwatch") | |
1475 | ||
1476 | # /etc/init.d -> /etc/rc.d/init.d | |
1477 | if (!/^\/etc\/init\.d$/) { | |
1478 | gsub("/etc/init.d", "/etc/rc.d/init.d") | |
1479 | } | |
1480 | ||
1481 | if (/\/etc\/rc\.d\/init\.d\// && !/functions/) { | |
1482 | if (!/%attr.*\/etc\/rc\.d\/init\.d/) { | |
1483 | $0 = "%attr(754,root,root) " $0 | |
1484 | } | |
1485 | if (/^%attr.*\/etc\/rc\.d\/init\.d/ && !/^%attr\(754 *,/) { | |
1486 | gsub("^%attr\\(... *,", "%attr(754,"); | |
1487 | } | |
1488 | } | |
1489 | ||
1490 | if (/lib.+\.so\b/ && !/\.so$/ && !/^%attr.*/ && !/%exclude/) { | |
1491 | $0 = "%attr(755,root,root) " $0 | |
1492 | } | |
1493 | ||
1494 | if (/%{perl_vendorarch}.*\.so$/ && !/^%attr.*/) { | |
1495 | $0 = "%attr(755,root,root) " $0 | |
1496 | } | |
1497 | ||
1498 | # remove attrs from man pages | |
1499 | if (/%{_mandir}/ && /^%attr/) { | |
1500 | sub("^%attr\\(.*\\) *", ""); | |
1501 | } | |
1502 | ||
1503 | # /etc/sysconfig files | |
1504 | # %attr(640,root,root) %config(noreplace) %verify(not size mtime md5) /etc/sysconfig/* | |
1505 | # attr not required, allow default 644 attr | |
1506 | if (!/network-scripts/ && !/%dir/ && !/\.d$/ && !/functions/ && !/\/etc\/sysconfig\/wmstyle/) { | |
1507 | if (/\/etc\/sysconfig\// && /%config/ && !/%config\(noreplace/) { | |
1508 | gsub("%config", "%config(noreplace)") | |
1509 | } | |
1510 | ||
1511 | if (/\/etc\/sysconfig\// && !/%config\(noreplace/) { | |
1512 | $NF = "%config(noreplace) " $NF | |
1513 | } | |
1514 | ||
1515 | if (/\/etc\/sysconfig\// && /%attr\(755/) { | |
1516 | gsub("^%attr\\(... *,", "%attr(640,"); | |
1517 | } | |
1518 | ||
1519 | if (/\/etc\/sysconfig\// && !/%verify/) { | |
1520 | gsub("/etc/sysconfig", "%verify(not size mtime md5) /etc/sysconfig"); | |
1521 | } | |
1522 | } | |
1523 | ||
1524 | # kill leading zeros | |
1525 | if (/%attr\(0[1-9]/) { | |
1526 | gsub("%attr\\(0", "%attr(") | |
1527 | } | |
1528 | ||
1529 | # kill leading whitespace | |
1530 | gsub(/^ +/, ""); | |
1531 | ||
1532 | # kill default attrs | |
1533 | gsub(/%dir %attr\(755,root,root\)/, "%dir"); | |
1534 | gsub(/%attr\(755,root,root\) %dir/, "%dir"); | |
1535 | if (!/%dir/) { | |
1536 | gsub(/%attr\(644,root,root\) /, ""); | |
1537 | } | |
1538 | ||
1539 | # sort %verify attrs | |
1540 | if (match($0, /%verify\(not([^)]+)\)/)) { | |
1541 | t = substr($0, RSTART, RLENGTH) | |
1542 | # kill commas: %verify(not,md5,size,mtime) | |
1543 | gsub(/,/, " ", t); | |
1544 | ||
1545 | gsub(/^%verify\(not |\)$/, "", t) | |
1546 | n = split(t, a, / /) | |
1547 | isort(a, n) | |
1548 | ||
1549 | s = "%verify(not" | |
1550 | for (i = 1 ; i <= n; i++) { | |
1551 | s = s " " a[i] | |
1552 | } | |
1553 | s = s ")" | |
1554 | ||
1555 | gsub(/%verify\(not[^)]+\)/, s) | |
1556 | } | |
1557 | ||
1558 | if (/%{_mandir}/) { | |
1559 | gsub("\.gz$", "*") | |
1560 | gsub("%ext_man$", "*") | |
1561 | } | |
1562 | ||
1563 | # locale dir and no %lang -> bad | |
1564 | if (/%{_datadir}\/locale\/.*\// && !/%(dir|lang)/) { | |
1565 | $(NF + 1) = "# FIXME consider using %find_lang" | |
1566 | } | |
1567 | ||
1568 | # python egg-infos | |
1569 | if (match($0, "^%{py_site(script)?dir}/.+-py"py_ver".egg-info$")) { | |
1570 | # tests: | |
1571 | #%{py_sitedir}/*-py2.4.egg-info | |
1572 | #%{py_sitescriptdir}/GnuPGInterface-%{version}-py2.4.egg-info | |
1573 | #%{py_sitescriptdir}/python_mpd-%{version}-py2.4.egg-info | |
1574 | #%{py_sitescriptdir}/mechanize-0.1.6b-py2.4.egg-info | |
1575 | ||
1576 | l = index($0, "/"); | |
1577 | t = substr($0, 0, l); | |
1578 | s = substr($0, l + 1, RLENGTH - l - length("-py"py_ver".egg-info")); | |
1579 | if (match(s, "[^-]+$")) { | |
1580 | if (RSTART > 1) { | |
1581 | s = substr(s, 0, RSTART - 1); | |
1582 | } | |
1583 | print "%if \"%{py_ver}\" > \"2.4\"" | |
1584 | gsub(t "/.+.egg-info", t "/" s "-*.egg-info"); | |
1585 | ||
1586 | print "%endif" | |
1587 | return 0; | |
1588 | } | |
1589 | } | |
1590 | ||
1591 | # atrpms | |
1592 | $0 = fixedsub("%{perl_man1dir}", "%{_mandir}/man1", $0); | |
1593 | $0 = fixedsub("%{perl_man3dir}", "%{_mandir}/man3", $0); | |
1594 | $0 = fixedsub("%{perl_bin}", "%{_bindir}", $0); | |
1595 | ||
1596 | gsub(libdir "/pkgconfig", "%{_pkgconfigdir}"); | |
1597 | gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}"); | |
1598 | gsub("%{_prefix}/lib/pkgconfig", "%{_pkgconfigdir}"); | |
1599 | ||
1600 | gsub("%{_datadir}/applications", "%{_desktopdir}"); | |
1601 | gsub("%{_datadir}/icons", "%{_iconsdir}"); | |
1602 | gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}"); | |
1603 | gsub("%{_datadir}/pear", "%{php_pear_dir}"); | |
1604 | gsub("%{_datadir}/php", "%{php_data_dir}"); | |
1605 | ||
1606 | return 1 | |
1607 | } | |
1608 | ||
1609 | function use_script_macros() | |
1610 | { | |
1611 | if (gsub("/sbin/service", "%service")) { | |
1612 | sub(" >/dev/null 2>&1 \|\|:", ""); | |
1613 | sub(" 2> /dev/null \|\| :", ""); | |
1614 | } | |
1615 | } | |
1616 | ||
1617 | function fill(ch, n, i) { | |
1618 | for (i = 0; i < n; i++) | |
1619 | printf("%c", ch) | |
1620 | } | |
1621 | ||
1622 | function format_flush(line, indent, newline, word, first_word) { | |
1623 | first_word = 1 | |
1624 | if (format_indent == -1) | |
1625 | newline = "" | |
1626 | else | |
1627 | newline = fill(" ", format_indent) "- " | |
1628 | ||
1629 | while (match(line, /[^\t ]+/)) { | |
1630 | word = substr(line, RSTART, RLENGTH) | |
1631 | if (length(newline) + length(word) + 1 > tw) { | |
1632 | print newline | |
1633 | ||
1634 | if (format_indent == -1) | |
1635 | newline = "" | |
1636 | else | |
1637 | newline = fill(" ", format_indent + 2) | |
1638 | first_word = 1 | |
1639 | } | |
1640 | ||
1641 | if (first_word) { | |
1642 | newline = newline word | |
1643 | first_word = 0 | |
1644 | } else | |
1645 | newline = newline " " word | |
1646 | ||
1647 | line = substr(line, RSTART + RLENGTH) | |
1648 | } | |
1649 | if (newline ~ /[^\t ]/) { | |
1650 | print newline | |
1651 | } | |
1652 | } | |
1653 | ||
1654 | function cflags(var) | |
1655 | { | |
1656 | if ($0 == var "=\"$RPM_OPT_FLAGS\"") { | |
1657 | removed[var] = 1 | |
1658 | return 0 | |
1659 | } | |
1660 | ||
1661 | if (!/!\?debug/) | |
1662 | sub("\$RPM_OPT_FLAGS", "%{rpmcflags}") | |
1663 | return 1 | |
1664 | } | |
1665 | ||
1666 | function unify_url(url) | |
1667 | { | |
1668 | ||
1669 | # sourceforge urls | |
1670 | # Docs about sourceforge mirror system: http://sourceforge.net/apps/trac/sourceforge/wiki/Mirrors | |
1671 | # TODO: SF unify: http://downloads.sourceforge.net/PROJECT/TARBALL | |
1672 | ||
1673 | # 1. unify domains | |
1674 | sub("^http://prdownloads\.sourceforge\.net/", "http://downloads.sourceforge.net/", url) | |
1675 | sub("^http://download\.sf\.net/", "http://downloads.sourceforge.net/", url) | |
1676 | sub("^http://download\.sourceforge\.net/", "http://downloads.sourceforge.net/", url) | |
1677 | sub("^http://dl\.sourceforge\.net/", "http://downloads.sourceforge.net/", url) | |
1678 | sub("^http://.*\.dl\.sourceforge\.net/", "http://downloads.sourceforge.net/", url) | |
1679 | sub("^http://dl\.sf\.net/", "http://downloads.sourceforge.net/", url) | |
1680 | sub("^http://downloads\.sourceforge\.net/sourceforge/", "http://downloads.sourceforge.net/", url) | |
1681 | ||
1682 | # 2. special hacks | |
1683 | # new style urls, strip "files/" between and prepend dl. | |
1684 | if (match(url, "^http://sourceforge.net/projects/[^/]+/files/")) { | |
1685 | url = substr(url, 1, RLENGTH - length("files/")) substr(url, RSTART + RLENGTH); | |
1686 | sub("^http://sourceforge.net/projects/", "http://downloads.sourceforge.net/project/", url); | |
1687 | } | |
1688 | ||
1689 | # 3. unify urls | |
1690 | if (url ~ /sourceforge.net/) { | |
1691 | sub("[?&]big_mirror=.*$", "", url); | |
1692 | sub("[?&]modtime=.*$", "", url); | |
1693 | sub("[?]use_mirror=.*$", "", url); | |
1694 | sub("[?]download$", "", url); | |
1695 | sub("/download$", "", url); | |
1696 | } | |
1697 | ||
1698 | sub("^ftp://ftp\.gnome\.org/", "http://ftp.gnome.org/", url) | |
1699 | sub("^http://ftp\.gnome\.org/pub/gnome/", "http://ftp.gnome.org/pub/GNOME/", url) | |
1700 | ||
1701 | # apache urls | |
1702 | sub("^http://apache.zone-h.org/", "http://www.apache.org/dist/", url) | |
1703 | ||
1704 | # gnu.org | |
1705 | sub("^ftp://ftp\.gnu\.org/", "http://ftp.gnu.org/", url) | |
1706 | sub("^http://ftp\.gnu\.org/pub/gnu/", "http://ftp.gnu.org/gnu/", url) | |
1707 | ||
1708 | # debian.org | |
1709 | sub("^ftp://ftp\.[^.]+\.debian\.org/", "ftp://ftp.debian.org/", url) | |
1710 | sub("^http://ftp\.[^.]+\.debian\.org/", "ftp://ftp.debian.org/", url) | |
1711 | sub("^ftp://ftp\.debian\.org/pub/debian/", "ftp://ftp.debian.org/debian/", url) | |
1712 | ||
1713 | return url | |
1714 | } | |
1715 | ||
1716 | function demacroize(str) | |
1717 | { | |
1718 | if (mod_name) { | |
1719 | sub("%{mod_name}", mod_name, str); | |
1720 | } | |
1721 | if (pearname) { | |
1722 | sub("%{_pearname}", pearname, str); | |
1723 | } | |
1724 | if (pearname) { | |
1725 | sub("%{pearname}", pearname, str); | |
1726 | } | |
1727 | if (name) { | |
1728 | sub("%{name}", name, str); | |
1729 | } | |
1730 | if (version) { | |
1731 | sub("%{version}", version, str); | |
1732 | } | |
1733 | if (_beta) { | |
1734 | sub("%{_beta}", _beta, str); | |
1735 | } | |
1736 | if (_rc) { | |
1737 | sub("%{_rc}", _rc, str); | |
1738 | } | |
1739 | if (_pre) { | |
1740 | sub("%{_pre}", _pre, str); | |
1741 | } | |
1742 | if (_snap) { | |
1743 | sub("%{_snap}", _snap, str); | |
1744 | } | |
1745 | if (subver) { | |
1746 | sub("%{subver}", subver, str); | |
1747 | } | |
1748 | return str; | |
1749 | } | |
1750 | ||
1751 | function kill_preamble_macros() | |
1752 | { | |
1753 | if ($1 ~ /^Obsoletes:/) { | |
1754 | # NB! assigning $2 a value breaks tabbing | |
1755 | $2 = demacroize($2); | |
1756 | } | |
1757 | if ($1 ~ /^URL:/) { | |
1758 | # NB! assigning $2 a value breaks tabbing | |
1759 | $2 = demacroize($2); | |
1760 | $2 = unify_url($2) | |
1761 | } | |
1762 | } | |
1763 | ||
1764 | function get_epoch(pkg, ver, epoch) | |
1765 | { | |
1766 | return | |
1767 | # should parse the BR lines more adequately: | |
1768 | # freetype = 2.0.0 -> correct | |
1769 | # freetype = 2.1.9 -> with epoch 1, as epoch 1 was added in 2.1.7 | |
1770 | ||
1771 | shell = "grep -o '^" pkg ":[^:]\+' ../PLD-doc/BuildRequires.txt | awk '{print $NF}'"; | |
1772 | shell | getline epoch; | |
1773 | return epoch; | |
1774 | } | |
1775 | ||
1776 | function format_requires(tag, value, n, p, i, deps, ndeps) { | |
1777 | # skip any formatting for commented out items or some weird macros | |
1778 | if (/^#/ || /%\(/) { | |
1779 | return tag "\t" value | |
1780 | } | |
1781 | n = split(value, p, / *,? */); | |
1782 | for (i = 1; i <= n; i++) { | |
1783 | if (p[i+1] ~ /[<=>]/) { | |
1784 | # add epoch if the version doesn't have it but BuildRequires.txt has | |
1785 | if (p[i] ~ /^[a-z]/ && p[i+2] !~ /^[0-9]+:/) { | |
1786 | epoch = get_epoch(p[i], p[i+2]) | |
1787 | if (epoch) { | |
1788 | p[i+2] = epoch ":" p[i+2]; | |
1789 | } | |
1790 | } | |
1791 | deps[ndeps++] = p[i] " " p[i+1] " " p[i+2]; | |
1792 | i += 2; | |
1793 | } else { | |
1794 | deps[ndeps++] = p[i]; | |
1795 | } | |
1796 | } | |
1797 | s = "" | |
1798 | for (i in deps) { | |
1799 | s = s sprintf("%s\t%s\n", tag, deps[i]); | |
1800 | } | |
1801 | return substr(s, 1, length(s)-1); | |
1802 | } | |
1803 | ||
1804 | function use_tabs() | |
1805 | { | |
1806 | # reverse vim: ts=4 sw=4 et | |
1807 | gsub(/ /, "\t"); | |
1808 | } | |
1809 | ||
1810 | function add_br(br) | |
1811 | { | |
1812 | BR[BR_count++] = br | |
1813 | } | |
1814 | ||
1815 | ||
1816 | # Load rpm macros | |
1817 | # you should update the list also in adapter when making changes here | |
1818 | function import_rpm_macros() { | |
1819 | # File with rpm groups | |
1820 | topdir = ENVIRON["_topdir"] | |
1821 | ||
1822 | if (!topdir) { | |
1823 | print "adapter.awk should not not be invoked directly, but via adapter script" > "/dev/stderr" | |
1824 | do_not_touch_anything = 1 | |
1825 | exit(rc = 1); | |
1826 | } | |
1827 | ||
1828 | # update this version dep each time some new macro export is added | |
1829 | if (!ENVIRON["ADAPTER_REVISION"] || ENVIRON["ADAPTER_REVISION"] < 1.47) { | |
1830 | print "adapter shell script is outdated, please cvs up it" > "/dev/stderr" | |
1831 | do_not_touch_anything = 1 | |
1832 | exit(rc = 1); | |
1833 | } | |
1834 | ||
1835 | # get cvsaddress for changelog section | |
1836 | # using rpm macros as too lazy to add ~/.adapterrc parsing support. | |
1837 | _cvsmaildomain = ENVIRON["_cvsmaildomain"] | |
1838 | _cvsmailfeedback = ENVIRON["_cvsmailfeedback"] | |
1839 | ||
1840 | prefix = ENVIRON["_prefix"] | |
1841 | bindir = ENVIRON["_bindir"] | |
1842 | sbindir = ENVIRON["_sbindir"] | |
1843 | libdir = ENVIRON["_libdir"] | |
1844 | sysconfdir = ENVIRON["_sysconfdir"] | |
1845 | datadir = ENVIRON["_datadir"] | |
1846 | includedir = ENVIRON["_includedir"] | |
1847 | mandir = ENVIRON["_mandir"] | |
1848 | infodir = ENVIRON["_infodir"] | |
1849 | examplesdir = ENVIRON["_examplesdir"] | |
1850 | docdir = ENVIRON["_defaultdocdir"] | |
1851 | kdedocdir = ENVIRON["_kdedocdir"] | |
1852 | gtkdocdir = ENVIRON["_gtkdocdir"] | |
1853 | desktopdir = ENVIRON["_desktopdir"] | |
1854 | pixmapsdir = ENVIRON["_pixmapsdir"] | |
1855 | javadir = ENVIRON["_javadir"] | |
1856 | pkgconfigdir = ENVIRON["_pkgconfigdir"] | |
1857 | npkgconfigdir = ENVIRON["_npkgconfigdir"] | |
1858 | ||
1859 | perl_sitearch = ENVIRON["perl_sitearch"] | |
1860 | perl_archlib = ENVIRON["perl_archlib"] | |
1861 | perl_privlib = ENVIRON["perl_privlib"] | |
1862 | perl_vendorlib = ENVIRON["perl_vendorlib"] | |
1863 | perl_vendorarch = ENVIRON["perl_vendorarch"] | |
1864 | perl_sitelib = ENVIRON["perl_sitelib"] | |
1865 | ||
1866 | py_sitescriptdir = ENVIRON["py_sitescriptdir"] | |
1867 | py_sitedir = ENVIRON["py_sitedir"] | |
1868 | py_scriptdir = ENVIRON["py_scriptdir"] | |
1869 | py_ver = ENVIRON["py_ver"] | |
1870 | ||
1871 | py3_sitescriptdir = ENVIRON["py3_sitescriptdir"] | |
1872 | py3_sitedir = ENVIRON["py3_sitedir"] | |
1873 | py3_scriptdir = ENVIRON["py3_scriptdir"] | |
1874 | py3_ver = ENVIRON["py3_ver"] | |
1875 | ||
1876 | ruby_archdir = ENVIRON["ruby_archdir"] | |
1877 | ruby_ridir = ENVIRON["ruby_ridir"] | |
1878 | ruby_rubylibdir = ENVIRON["ruby_rubylibdir"] | |
1879 | ruby_sitearchdir = ENVIRON["ruby_sitearchdir"] | |
1880 | ruby_sitelibdir = ENVIRON["ruby_sitelibdir"] | |
1881 | ruby_rdocdir = ENVIRON["ruby_rdocdir"] | |
1882 | ||
1883 | php_pear_dir = ENVIRON["php_pear_dir"] | |
1884 | php_data_dir = ENVIRON["php_data_dir"] | |
1885 | tmpdir = ENVIRON["tmpdir"] | |
1886 | } | |
1887 | ||
1888 | ||
1889 | # php virtual deps as discussed in devel-en | |
1890 | function replace_php_virtual_deps() { | |
1891 | pkg = $2 | |
1892 | # if (pkg == "php-program") { | |
1893 | # $0 = $1 "\t/usr/bin/php" | |
1894 | # return | |
1895 | # } | |
1896 | ||
1897 | # if (pkg ~ /^php-[a-z]/ && pkg !~ /^php-(pear|common|cli|devel|fcgi|cgi|dirs|program|pecl-)/) { | |
1898 | # sub(/^php-/, "php(", pkg); | |
1899 | # sub(/$/, ") # verify this correctness -- it may be wanted to use specific not virtual dep", pkg); | |
1900 | # $2 = pkg | |
1901 | # } | |
1902 | ||
1903 | if (pkg ~/^php$/) { | |
1904 | $2 = "webserver(php)"; | |
1905 | if ($4 ~ /^[0-9]:/) { | |
1906 | $4 = substr($4, 3); | |
1907 | } | |
1908 | } | |
1909 | ||
1910 | if (pkg ~/^php4$/) { | |
1911 | $2 = "webserver(php)"; | |
1912 | if ($4 ~ /^[0-9]:/) { | |
1913 | $4 = substr($4, 3); | |
1914 | } | |
1915 | } | |
1916 | } | |
1917 | ||
1918 | function replace_requires() { | |
1919 | ||
1920 | sub(/^python-setuptools-devel$/, "python-distribute", $2); | |
1921 | sub(/^gcc-g77/, "gcc-fortran", $2); | |
1922 | ||
1923 | # use virtual, not package name | |
1924 | sub(/^rpm-build-macros$/, "rpmbuild(macros)", $2); | |
1925 | ||
1926 | # bad package.xml, see http://pear.php.net/bugs/bug.php?id=17779 | |
1927 | sub(/^php-php-gtk/, "php-gtk2", $2); | |
1928 | ||
1929 | # jpackages | |
1930 | sub(/^antlr3$/, "java-antlr3", $2); | |
1931 | sub(/^avalon-framework$/, "java-avalon-framework", $2); | |
1932 | sub(/^avalon-logkit$/, "java-avalon-logkit", $2); | |
1933 | sub(/^axis$/, "java-axis", $2); | |
1934 | sub(/^bsf$/, "java-bsf", $2); | |
1935 | sub(/^gnu-regexp$/, "java-gnu-regexp", $2); | |
1936 | sub(/^gnu.regexp$/, "java-gnu-regexp", $2); | |
1937 | sub(/^hamcrest$/, "java-hamcrest", $2); | |
1938 | sub(/^jaas$/, "java(jaas)", $2); | |
1939 | sub(/^jaf$/, "java(jaf)", $2); | |
1940 | sub(/^jakarta-ant$/, "ant", $2); | |
1941 | sub(/^jakarta-commons-httpclient$/, "java-commons-httpclient", $2); | |
1942 | sub(/^jakarta-log4j$/, "java-log4j", $2); | |
1943 | sub(/^jakarta-oro$/, "java-oro", $2); | |
1944 | sub(/^jakarta-servletapi$/, "java(servlet)", $2); | |
1945 | sub(/^java-devel$/, "jdk", $2); | |
1946 | sub(/^java\(JSP\)$/, "java(jsp)", $2); | |
1947 | sub(/^java\(JavaServerFaces\)$/, "java(javaserverfaces)", $2); | |
1948 | sub(/^java\(Portlet\)$/, "java(portlet)", $2); | |
1949 | sub(/^java\(Servlet\)$/, "java(servlet)", $2); | |
1950 | sub(/^javamail$/, "java(javamail)", $2); | |
1951 | sub(/^jaxp$/, "java(jaxp)", $2); | |
1952 | sub(/^jaxp_parser_impl$/, "java(jaxp_parser_impl)", $2); | |
1953 | sub(/^jaxp_transform_impl$/, "java(jaxp_transform_impl)", $2); | |
1954 | sub(/^jce$/, "java(jce)", $2); | |
1955 | sub(/^jcommon$/, "java-jcommon", $2); | |
1956 | sub(/^jdbc-stdext$/, "java(jdbc-stdext)", $2); | |
1957 | sub(/^jdepend$/, "java-jdepend", $2); | |
1958 | sub(/^jfreechart$/, "java-jfreechart", $2); | |
1959 | sub(/^jmx$/, "java(jmx)", $2); | |
1960 | sub(/^jndi$/, "java(jndi)", $2); | |
1961 | sub(/^jsch$/, "java-jsch", $2); | |
1962 | sub(/^jsse$/, "java(jsse)", $2); | |
1963 | sub(/^jta$/, "java(jta)", $2); | |
1964 | sub(/^junit$/, "java-junit", $2); | |
1965 | sub(/^ldapjdk$/, "ldapsdk", $2); | |
1966 | sub(/^log4j$/, "java-log4j", $2); | |
1967 | sub(/^logging-log4j$/, "java-log4j", $2); | |
1968 | sub(/^oro$/, "java-oro", $2); | |
1969 | sub(/^rhino$/, "java-rhino", $2); | |
1970 | sub(/^saxon-scripts$/, "saxon", $2); | |
1971 | sub(/^servlet$/, "java(servlet)", $2); | |
1972 | sub(/^uddi4j$/, "java-uddi4j", $2); | |
1973 | sub(/^wsdl4j$/, "java-wsdl4j", $2); | |
1974 | sub(/^xalan-j$/, "java-xalan", $2); | |
1975 | sub(/^xalan-j2$/, "java-xalan", $2); | |
1976 | sub(/^xerces-j$/, "java-xerces", $2); | |
1977 | sub(/^xerces-j2$/, "java-xerces", $2); | |
1978 | sub(/^xml-commons-apis$/, "java-xml-commons-apis", $2); | |
1979 | sub(/^xml-commons-resolver$/, "java-xml-commons-resolver", $2); | |
1980 | ||
1981 | # fedora / redhat | |
1982 | sub(/^Django$/, "python-django", $2); | |
1983 | sub(/^GitPython$/, "python-git", $2); | |
1984 | sub(/^PyQt4-devel$/, "python-PyQt4-devel", $2); | |
1985 | sub(/^PyQwt-devel$/, "python-PyQwt-devel", $2); | |
1986 | sub(/^ccid$/, "pcsc-driver-ccid", $2); | |
1987 | sub(/^chkconfig$/, "/sbin/chkconfig", $2); | |
1988 | sub(/^db4-devel$/, "db-devel", $2); | |
1989 | sub(/^dbus-python$/, "python-dbus", $2); | |
1990 | sub(/^file-devel$/, "libmagic-devel", $2); | |
1991 | sub(/^freetype2-devel$/, "freetype-devel", $2); | |
1992 | sub(/^fuse-devel$/, "libfuse-devel", $2); | |
1993 | sub(/^gamin-python$/, "python-gamin", $2); | |
1994 | sub(/^gcc-c\+\+$/, "libstdc++-devel", $2); | |
1995 | sub(/^gnome-python2-extras$/, "python-gnome-extras", $2); | |
1996 | sub(/^gnome-python2-gtkspell$/, "python-gnome-extras-gtkspell", $2); | |
1997 | sub(/^gtk-sharp2-devel$/, "dotnet-gtk-sharp2-devel", $2); | |
1998 | sub(/^gtk2$/, "gtk+2", $2); | |
1999 | sub(/^gtk2-devel$/, "gtk+2-devel", $2); | |
2000 | sub(/^initscripts$/, "rc-scripts", $2); | |
2001 | sub(/^iproute$/, "iproute2", $2); | |
2002 | sub(/^iscsi-initiator-utils$/, "open-iscsi", $2); | |
2003 | sub(/^libXft-devel$/, "xorg-lib-libXft-devel", $2); | |
2004 | sub(/^libXrandr-devel$/, "xorg-lib-libXrandr-devel", $2); | |
2005 | sub(/^libcurl-devel$/, "curl-devel", $2); | |
2006 | sub(/^libsrtp-devel$/, "srtp-devel", $2); | |
2007 | sub(/^mod_wsgi$/, "apache-mod_wsgi", $2); | |
2008 | sub(/^notify-python$/, "python-pynotify", $2); | |
2009 | sub(/^pcsc-lite-ccid$/, "pcsc-driver-ccid", $2); | |
2010 | sub(/^pulseaudio-libs-devel$/, "pulseaudio-devel", $2); | |
2011 | sub(/^pyOpenSSL$/, "python-pyOpenSSL", $2); | |
2012 | sub(/^pygobject2$/, "python-pygobject", $2); | |
2013 | sub(/^pygtk2$/, "python-pygtk", $2); | |
2014 | sub(/^pygtk2-devel$/, "python-pygtk-devel", $2); | |
2015 | sub(/^python-enchant$/, "python-pyenchant", $2); | |
2016 | sub(/^python-imaging$/, "python-PIL", $2); | |
2017 | sub(/^python-imaging-tk$/, "python-PIL-tk", $2); | |
2018 | sub(/^python-pygtk$/, "python-pygtk-gtk", $2); | |
2019 | sub(/^python-twisted-core$/, "python-TwistedCore", $2); | |
2020 | sub(/^python-twisted-names$/, "python-TwistedNames", $2); | |
2021 | sub(/^python2-devel$/, "python-devel", $2); | |
2022 | sub(/^qt4-devel$/, "qt4-build", $2); | |
2023 | sub(/^qt4-webkit-devel$/, "QtWebKit-devel", $2); | |
2024 | sub(/^qtlockedfile-devel$/, "QtLockedFile-devel", $2); | |
2025 | sub(/^qtsingleapplication-devel$/, "QtSingleApplication-devel", $2); | |
2026 | sub(/^rpm-python$/, "python-rpm", $2); | |
2027 | sub(/^sip-devel$/, "python-sip-devel", $2); | |
2028 | sub(/^tftp-server$/, "tftpdaemon", $2); | |
2029 | sub(/^tkinter$/, "python-tkinter", $2); | |
2030 | sub(/^xapian-bindings-python$/, "python-xapian", $2); | |
2031 | sub(/^xorg-x11-server-sdk$/, "xorg-xserver-server-devel", $2); | |
2032 | ||
2033 | # debian / ubuntu | |
2034 | sub(/^blkid-dev$/, "libblkid-devel", $2); | |
2035 | sub(/^ext2fs-dev$/, "e2fsprogs-devel", $2); | |
2036 | sub(/^libao-dev$/, "libao-devel", $2); | |
2037 | sub(/^libboost-filesystem[0-9.]+-dev$/, "boost-devel", $2); | |
2038 | sub(/^libboost-program-options[0-9.]+-dev$/, "boost-devel", $2); | |
2039 | sub(/^libboost-regex[0-9.]+-dev$/, "boost-devel", $2); | |
2040 | sub(/^libboost-thread[0-9.]+-dev$/, "boost-devel", $2); | |
2041 | sub(/^libcurl4-openssl-dev$/, "curl-devel", $2); | |
2042 | sub(/^libdnet-dev$/, "libdnet-devel", $2); | |
2043 | sub(/^libesd0-dev$/, "esound-devel", $2); | |
2044 | sub(/^libfishsound1-dev$/, "libfishsound-devel", $2); | |
2045 | sub(/^libgconf2-dev$/, "GConf2-devel", $2); | |
2046 | sub(/^libgl1-mesa-dev$/, "OpenGL-devel", $2); | |
2047 | sub(/^libgl1-mesa-dri$/, "OpenGL", $2); | |
2048 | sub(/^libglib2.0-dev$/, "glib2-devel", $2); | |
2049 | sub(/^libglu1-mesa-dev$/, "OpenGL-GLU-devel", $2); | |
2050 | sub(/^libgtk2.0-dev$/, "gtk+2-devel", $2); | |
2051 | sub(/^libhunspell-dev$/, "hunspell-devel", $2); | |
2052 | sub(/^libmcrypt-dev$/, "libmcrypt-devel", $2); | |
2053 | sub(/^libmhash-dev$/, "mhash-devel", $2); | |
2054 | sub(/^liboggz1-dev$/, "libggz-devel", $2); | |
2055 | sub(/^libpango1.0-dev$/, "pango-devel", $2); | |
2056 | sub(/^libqt4-dev$/, "qt4-build", $2); | |
2057 | sub(/^libshout3-dev$/, "libshout-devel", $2); | |
2058 | sub(/^libslp-dev$/, "openslp-devel", $2); | |
2059 | sub(/^libsndfile1-dev$/, "libsndfile-devel", $2); | |
2060 | sub(/^libspeex-dev$/, "speex-devel", $2); | |
2061 | sub(/^libssl-dev$/, "openssl-devel", $2); | |
2062 | sub(/^libvorbis-dev$/, "libvorbis-devel", $2); | |
2063 | sub(/^libxslt1-dev$/, "libxslt-devel", $2); | |
2064 | sub(/^libxss-dev$/, "xorg-lib-libXScrnSaver-devel", $2); | |
2065 | sub(/^mesa-common-dev$/, "OpenGL-devel", $2); | |
2066 | ||
2067 | # altlinux | |
2068 | sub(/^libgit-devel$/, "git-core-devel", $2); | |
2069 | sub(/^libncurses-devel$/, "ncurses-devel", $2); | |
2070 | sub(/^libncursesxx-devel$/, "ncurses-c++-devel", $2); | |
2071 | sub(/^libpcre-devel$/, "pcre-devel", $2); | |
2072 | sub(/^libssl-devel$/, "openssl-devel", $2); | |
2073 | ||
2074 | # suse | |
2075 | sub(/^alsa-devel$/, "alsa-lib-devel", $2); | |
2076 | sub(/^gtk-sharp2$/, "dotnet-gtk-sharp2", $2); | |
2077 | sub(/^gtkmm2-devel$/, "gtkmm-devel", $2); | |
2078 | sub(/^libexpat-devel$/, "expat-devel", $2); | |
2079 | sub(/^libffmpeg-devel$/, "ffmpeg-devel", $2); | |
2080 | sub(/^libopenssl-devel$/, "openssl-devel", $2); | |
2081 | sub(/^libpulse-devel$/, "pulseaudio-devel", $2); | |
2082 | sub(/^monodoc-core$/, "mono-monodoc", $2); | |
2083 | sub(/^python-gtk$/, "python-pygtk-gtk", $2); | |
2084 | ||
2085 | replace_php_virtual_deps() | |
2086 | } | |
2087 | ||
2088 | function replace_groupnames(group) { | |
2089 | group = replace(group, "Amusements/Games", "Applications/Games"); | |
2090 | group = replace(group, "Amusements/Games/Strategy/Real Time", "X11/Applications/Games/Strategy"); | |
2091 | group = replace(group, "Application/Multimedia", "Applications/Multimedia"); | |
2092 | group = replace(group, "Application/System", "Applications/System"); | |
2093 | group = replace(group, "Applications/Compilers", "Development/Languages"); | |
2094 | group = replace(group, "Applications/Daemons", "Daemons"); | |
2095 | group = replace(group, "Applications/Internet", "Applications/Networking"); | |
2096 | group = replace(group, "Applications/Internet/Peer to Peer", "Applications/Networking"); | |
2097 | group = replace(group, "Applications/Productivity", "X11/Applications"); | |
2098 | group = replace(group, "Applications/Security", "Applications/System"); | |
2099 | group = replace(group, "Applications/Web", "Applications/WWW"); | |
2100 | group = replace(group, "Database", "Applications/Databases"); | |
2101 | group = replace(group, "Development/C", "Development/Libraries"); | |
2102 | group = replace(group, "Development/Code Generators", "Development"); | |
2103 | group = replace(group, "Development/Docs", "Documentation"); | |
2104 | group = replace(group, "Development/Documentation", "Documentation"); | |
2105 | group = replace(group, "Development/Java", "Development/Languages/Java"); | |
2106 | group = replace(group, "Development/Languages/C and C++", "Libraries"); | |
2107 | group = replace(group, "Development/Languages/Other", "Development/Languages");; | |
2108 | group = replace(group, "Development/Languages/Ruby", "Development/Languages"); | |
2109 | group = replace(group, "Development/Libraries/C and C++", "Development/Libraries"); | |
2110 | group = replace(group, "Development/Libraries/Java", "Development/Languages/Java"); | |
2111 | group = replace(group, "Development/Libraries/Python", "Development/Languages/Python"); | |
2112 | group = replace(group, "Development/Libraries/TCL", "Development/Languages/Tcl");; | |
2113 | group = replace(group, "Development/Other", "Development"); | |
2114 | group = replace(group, "Development/Python", "Development/Languages/Python"); | |
2115 | group = replace(group, "Development/Testing", "Development"); | |
2116 | group = replace(group, "Editors", "Applications/Text"); | |
2117 | group = replace(group, "Emulators", "Applications/Emulators"); | |
2118 | group = replace(group, "File tools", "Applications/File"); | |
2119 | group = replace(group, "Games", "Applications/Games"); | |
2120 | group = replace(group, "Library/Development", "Development/Libraries"); | |
2121 | group = replace(group, "Networking/Deamons", "Networking/Daemons"); | |
2122 | group = replace(group, "Networking/Mail", "Applications/Mail"); | |
2123 | group = replace(group, "Networking/Other", "Networking"); | |
2124 | group = replace(group, "Productivity/Databases/Servers", "Applications/Databases"); | |
2125 | group = replace(group, "Productivity/Multimedia/Other", "X11/Applications/Multimedia"); | |
2126 | group = replace(group, "Productivity/Networking/Web/Servers", "Networking/Daemons/HTTP");; | |
2127 | group = replace(group, "Shells", "Applications/Shells"); | |
2128 | group = replace(group, "System Environment/Base", "Base"); | |
2129 | group = replace(group, "System Environment/Daemons", "Daemons"); | |
2130 | group = replace(group, "System Environment/Kernel", "Base/Kernel"); | |
2131 | group = replace(group, "System Environment/Libraries", "Libraries"); | |
2132 | group = replace(group, "System Tools", "Applications/System"); | |
2133 | group = replace(group, "System", "Base"); | |
2134 | group = replace(group, "System/Base", "Base"); | |
2135 | group = replace(group, "System/Kernel and hardware", "Base/Kernel"); | |
2136 | group = replace(group, "System/Libraries", "Libraries"); | |
2137 | group = replace(group, "System/Servers", "Daemons"); | |
2138 | group = replace(group, "Text Processing/Markup/HTML", "Applications/Text"); | |
2139 | group = replace(group, "Text Processing/Markup/XML", "Applications/Text"); | |
2140 | group = replace(group, "Text tools", "Applications/Text"); | |
2141 | group = replace(group, "User Interface/Desktops", "X11/Applications"); | |
2142 | group = replace(group, "Utilities/System", "Applications/System"); | |
2143 | group = replace(group, "Web/Database", "Applications/WWW"); | |
2144 | group = replace(group, "X11/GNOME", "X11/Applications"); | |
2145 | group = replace(group, "X11/GNOME/Applications", "X11/Applications"); | |
2146 | group = replace(group, "X11/GNOME/Development/Libraries", "X11/Development/Libraries"); | |
2147 | group = replace(group, "X11/Games", "X11/Applications/Games"); | |
2148 | group = replace(group, "X11/Games/Strategy", "X11/Applications/Games/Strategy"); | |
2149 | group = replace(group, "X11/Library", "X11/Libraries"); | |
2150 | group = replace(group, "X11/Utilities", "X11/Applications"); | |
2151 | group = replace(group, "X11/XFree86", "X11"); | |
2152 | group = replace(group, "X11/Xserver", "X11/Servers"); | |
2153 | ||
2154 | return group; | |
2155 | } | |
2156 | ||
2157 | # vim:ts=4:sw=4 |