]> git.pld-linux.org Git - packages/rpm-build-tools.git/blobdiff - adapter.awk
- more en
[packages/rpm-build-tools.git] / adapter.awk
index 2a8de4b40db85485d5276af01b2989e14a5ebb1b..60eff7e254c1323e478351488f1333f18720057d 100644 (file)
@@ -1,15 +1,18 @@
 #!/bin/awk -f
 #
-# This is adapter v0.27. Adapter adapts .spec files for PLD.
+# This is adapter v0.27. Adapter adapts .spec files for PLD Linux.
 #
-# Copyright (C) 1999-2003 PLD-Team <feedback@pld-linux.org>
+# Copyright (C) 1999-2005 PLD-Team <feedback@pld-linux.org>
 # Authors:
 #      Micha³ Kuratczyk <kura@pld.org.pl>
 #      Sebastian Zagrodzki <s.zagrodzki@mimuw.edu.pl>
 #      Tomasz K³oczko <kloczek@rudy.mif.pg.gda.pl>
 #      Artur Frysiak <wiget@pld-linux.org>
 #      Michal Kochanowicz <mkochano@pld.org.pl>
-#      Elan Ruusamäe <glen@pld-linux.org>
+#      Elan Ruusamä¤e <glen@pld-linux.org>
+#
+# See cvs log adapter{,.awk} for list of contributors
+#
 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
 
 # TODO
@@ -21,6 +24,9 @@
 # - desc wrapping is totally fucked up on global.spec,1.25, dosemu.spec,1.115-
 
 BEGIN {
+       RPM_SECTIONS = "package|build|changelog|clean|description|install|post|posttrans|postun|pre|prep|pretrans|preun|triggerin|triggerpostun|triggerun"
+       SECTIONS = "^%(" RPM_SECTIONS ")"
+
        preamble = 1            # Is it part of preamble? Default - yes
        boc = 4                 # Beginning of %changelog
        bod = 0                 # Beginning of %description
@@ -44,7 +50,7 @@ BEGIN {
        # File with rpm groups
        "rpm --eval %_sourcedir" | getline groups_file
        groups_file = groups_file "/rpm.groups"
-       system("cd `rpm --eval %_sourcedir`; cvs up rpm.groups >/dev/null")
+       system("cd `rpm --eval %_sourcedir`; [ -f rpm.groups ] || cvs up rpm.groups >/dev/null")
 
        # Temporary file for changelog section
        changelog_file = ENVIRON["HOME"] "/tmp/adapter.changelog"
@@ -60,6 +66,7 @@ BEGIN {
        "rpm --eval %_mandir"   | getline mandir
        "rpm --eval %_infodir"  | getline infodir
        "rpm --eval %_examplesdir"      | getline examplesdir
+       "rpm --eval %_defaultdocdir"    | getline docdir
 
        "rpm --eval %perl_sitearch" | getline perl_sitearch
        "rpm --eval %perl_archlib" | getline perl_archlib
@@ -83,10 +90,13 @@ FNR == 1 {
 
 # If the latest line matched /%files/
 defattr == 1 {
-       if ($0 !~ /defattr/)    # If no %defattr
-               print "%defattr(644,root,root,755)"     # Add it
-       else
-               $0 = "%defattr(644,root,root,755)"      # Correct mistakes (if any)
+       if (ENVIRON["SKIP_DEFATTR"] != 1) {
+               if ($0 !~ /defattr/) {  # If no %defattr
+                       print "%defattr(644,root,root,755)"     # Add it
+               } else {
+                       $0 = "%defattr(644,root,root,755)"      # Correct mistakes (if any)
+               }
+       }
        defattr = 0
 }
 
@@ -94,6 +104,8 @@ function b_makekey(a, b,     s) {
        s = a "" b;
        # kill bcond
     gsub(/[#%]+{[!?]+[_a-zA-Z0-9]+:/, "", s);
+       # kill commented out items
+    gsub(/[# \t]*/, "", s);
        return s;
 }
 
@@ -104,7 +116,12 @@ function b_makekey(a, b,   s) {
 #   so don't do that.
 # - comments leading the BR/R can not be associated,
 #   so don't adapterize when the BR/R are mixed with comments
-ENVIRON["SORTBR"] == 1 && preamble == 1 && /(Build)?Requires/, /(Build)?Requires/ { # && !/^%/) {
+ENVIRON["SKIP_SORTBR"] != 1 && preamble == 1 && /(PreReq|(Build)?Requires)/, /(PreReq|(Build)?Requires)/ {
+       if ($1 ~ /PreReq:/) {
+               sub(/PreReq:/, "Requires:", $1);
+       }
+       format_preamble()
+
        b_idx++;
        l = substr($0, index($0, $2));
        b_ktmp = b_makekey($1, l);
@@ -146,8 +163,8 @@ preamble == 1 {
        next
 }
 
-# Remove defining _applnkdir (this macro has been included in rpm-3.0.4)
 /^%define/ {
+       # Remove defining _applnkdir (this macro has been included in rpm-3.0.4)
        if ($2 == "_applnkdir") {
                next
        }
@@ -171,8 +188,14 @@ preamble == 1 {
                sbindir = $3
        if ($2 ~ /_libdir/)
                libdir = $3
-       if ($2 ~ /_sysconfdir/ && $3 !~ /^%\(/)
-               sysconfdir = $3
+       if ($2 ~ /_sysconfdir/) {
+               if ($3 ~ /^%\(/) {
+                       # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.")
+                       sysconfdir = "%%%%%%%%%%%%%%"
+               } else {
+                       sysconfdir = $3
+               }
+       }
        if ($2 ~ /_datadir/)
                datadir = $3
        if ($2 ~ /_includedir/)
@@ -181,6 +204,8 @@ preamble == 1 {
                mandir = $3
        if ($2 ~ /_infodir/)
                infodir = $3
+       if ($2 ~ /_docdir/)
+               docdir = $3
 
        # version related macros
        if ($2 ~ /^_beta$/)
@@ -211,7 +236,7 @@ preamble == 1 {
 ################
 # %description #
 ################
-/^%description/, (/^%[a-z]+/ && !/^%description/ && !/^%((end)?if|else)/) {
+/^%description/, (!/^%description/ && $0 ~ SECTIONS) {
        preamble = 0
 
        if (/^%description/) {
@@ -221,7 +246,7 @@ preamble == 1 {
        }
 
        # Format description
-       if (description == 1 && !/^%[a-z]+/ && !/^%description/) {
+       if (ENVIRON["SKIP_DESC"] != 1 && description == 1 && !/^%[a-z]+/ && !/^%description/) {
                if (/^[ \t]*$/) {
                        format_flush(format_line, format_indent)
                        print ""
@@ -260,7 +285,7 @@ preamble == 1 {
 #########
 # %prep #
 #########
-/^%prep/, (/^%[a-z]+$/ && !/^%prep/ && !/^%((end)?if|else)/) {
+/^%prep/, (!/^%prep/ && $0 ~ SECTIONS) {
        preamble = 0
 
        use_macros()
@@ -271,21 +296,21 @@ preamble == 1 {
        }
 
        if (/^%setup/) {
-               gsub(name, "%{name}");
-               gsub(version, "%{version}");
+               $0 = fixedsub(name, "%{name}", $0);
+               $0 = fixedsub(version, "%{version}", $0);
                if (_beta) {
-                       gsub(_beta, "%{_beta}");
+                       $0 = fixedsub(_beta, "%{_beta}", $0);
                }
                if (_rc) {
-                       gsub(_rc, "%{_rc}");
+                       $0 = fixedsub(_rc, "%{_rc}", $0);
                }
                if (_snap) {
-                       gsub(_snap, "%{_snap}");
+                       $0 = fixedsub(_snap, "%{_snap}", $0);
                }
        }
 
        if (/^%setup/ && /-n %{name}-%{version}( |$)/) {
-               sub(/ -n %{name}-%{version}/, "")
+               $0 = fixedsub(" -n %{name}-%{version}", "", $0)
        }
 
        # invalid in %prep
@@ -295,7 +320,7 @@ preamble == 1 {
 ##########
 # %build #
 ##########
-/^%build/, (/^%[a-z]+$/ && !/^%build/ && !/^%((end)?if|else)/) {
+/^%build/, (!/^%build/ && $0 ~ SECTIONS) {
        preamble = 0
 
        use_macros()
@@ -362,7 +387,7 @@ preamble == 1 {
 ##########
 # %clean #
 ##########
-/^%clean/, (/^%[a-z]+$/ && !/^%clean/ && !/^%((end)?if|else)/) {
+/^%clean/, (!/^%clean/ && $0 ~ SECTIONS) {
        did_clean = 1
 
        # prevent next section header like "%post -p /sbin/ldconfig" being adapterized
@@ -374,7 +399,7 @@ preamble == 1 {
 ############
 # %install #
 ############
-/^%install/, (/^%[a-z]+$/ && !/^%install/ && !/^%((end)?if|else)/) {
+/^%install/, (!/^%install/ && $0 ~ SECTIONS) {
 
        preamble = 0
 
@@ -425,7 +450,7 @@ preamble == 1 {
 ##########
 # %files #
 ##########
-/^%files/, (/^%[a-z \-]+$/ && !/^%files/ && !/^%((end)?if|else)/) {
+/^%files/, (!/^%files/ && $0 ~ SECTIONS) {
        preamble = 0
 
        if ($0 ~ /^%files/)
@@ -437,7 +462,7 @@ preamble == 1 {
 ##############
 # %changelog #
 ##############
-/^%changelog/, (/^%[a-z]+$/ && !/^%changelog/) {
+/^%changelog/, (!/^%changelog/ && $0 ~ SECTIONS) {
        preamble = 0
        has_changelog = 1
        skip = 0
@@ -485,7 +510,7 @@ preamble == 1 {
 ###########
 # SCRIPTS #
 ###########
-/^%pre/, (/^%[a-z]+$/ && !/^%pre/) {
+/^%pre/, (!/^%pre/ && $0 ~ SECTIONS) {
        preamble = 0
 
        # %useradd and %groupadd may not be wrapped
@@ -496,28 +521,29 @@ preamble == 1 {
        }
 }
 
-/^%post/, (/^%[a-z]+$/ && !/^%post/) {
+/^%post/, (!/^%post/ && $0 ~ SECTIONS) {
        preamble = 0
+       use_macros()
 }
-/^%preun/, (/^%[a-z]+$/ && !/^%preun/) {
+/^%preun/, (!/^%preun/ && $0 ~ SECTIONS) {
        preamble = 0
 }
-/^%postun/, (/^%[a-z]+$/ && !/^%postun/) {
+/^%postun/, (!/^%postun/ && $0 ~ SECTIONS) {
        preamble = 0
 }
-/^%triggerin/, (/^%[a-z]+$/ && !/^%triggerin/) {
+/^%triggerin/, (!/^%triggerin/ && $0 ~ SECTIONS) {
        preamble = 0
 }
-/^%triggerun/, (/^%[a-z]+$/ && !/^%triggerun/) {
+/^%triggerun/, (!/^%triggerun/ && $0 ~ SECTIONS) {
        preamble = 0
 }
-/^%triggerpostun/, (/^%[a-z]+$/ && !/^%triggerpostun/) {
+/^%triggerpostun/, (!/^%triggerpostun/ && $0 ~ SECTIONS) {
        preamble = 0
 }
-/^%pretrans/, (/^%[a-z]+$/ && !/^%pretrans/) {
+/^%pretrans/, (!/^%pretrans/ && $0 ~ SECTIONS) {
        preamble = 0
 }
-/^%posttrans/, (/^%[a-z]+$/ && !/^%posttrans/) {
+/^%posttrans/, (!/^%posttrans/ && $0 ~ SECTIONS) {
        preamble = 0
 }
 
@@ -537,7 +563,7 @@ preamble == 1 {
 
        field = tolower($1)
        fieldnlower = $1
-       if (field ~ /summary:/) {
+       if (field ~ /summary:/ && !/etc\.$/) {
                sub(/\.$/, "", $0);
        }
        if (field ~ /group(\([^)]+\)):/)
@@ -560,12 +586,15 @@ preamble == 1 {
                sub(/^System Environment\/Libraries$/, "Libraries", Grupa)
                sub(/^System Environment\/Daemons$/, "Daemons", Grupa)
                sub(/^Applications\/Internet$/, "Applications/Networking", Grupa)
+               sub(/^Applications\/Daemons$/, "Daemons", Grupa)
+               sub(/^Application\/Multimedia$/, "Applications/Multimedia", Grupa)
                sub(/^System\/Servers$/, "Daemons", Grupa)
                sub(/^X11\/Xserver$/, "X11/Servers", Grupa)
-               sub(/^X11\/XFree86$/, "X11", Grupa)
+               sub(/^X11\/XFree86/, "X11", Grupa)
                sub(/^Applications\/Compilers$/, "Development/Languages", Grupa)
                sub(/^Applications\/Internet\/Peer to Peer/, "Applications/Networking", Grupa)
                sub(/^Networking\/Deamons$/, "Networking/Daemons", Grupa)
+               sub(/^Development\/Docs$/, "Documentation", Grupa)
 
                print "Group:\t\t" Grupa
                if (Grupa ~ /^X11/ && x11 == 0) # Is it X11 application?
@@ -591,11 +620,11 @@ preamble == 1 {
        }
 
        if (field ~ /prereq:/) {
-               $1 = "Requires:"
+               sub(/PreReq:/, "Requires:", $1);
        }
 
-       # split (build)requires on commas
-       if (field ~ /requires:/ && $0 ~ /,/) {
+       # split (build)requires, obsoletes on commas
+       if (field ~ /(obsoletes|requires):/ && $0 ~ /,/) {
                l = substr($0, index($0, $2));
                n = split(l, p, / *, */);
                for (i in p) {
@@ -723,12 +752,11 @@ preamble == 1 {
        if (field ~ /^source:/)
                $1 = "Source0:"
 
-       if (field ~ /patch:/)
+       if (field ~ /^patch:/)
                $1 = "Patch0:"
 
        format_preamble()
 
-
        if (field ~ /requires/) {
                # atrpms
                $0 = fixedsub("%{eversion}", "%{epoch}:%{version}-%{release}", $0);
@@ -768,8 +796,6 @@ END {
                print
        system("rm -f " changelog_file)
 
-
-
        if (did_clean == 0) {
                print ""
                print "%clean"
@@ -816,6 +842,11 @@ function format_preamble()
 # Replace directly specified directories with macros
 function use_macros()
 {
+       # -m, --skip-macros, --no-macros -- skip macros subst
+       if (ENVIRON["SKIP_MACROS"]) {
+               return
+       }
+
        gsub(perl_sitearch, "%{perl_sitearch}")
        gsub(perl_archlib, "%{perl_archlib}")
        gsub(perl_privlib, "%{perl_privlib}")
@@ -880,6 +911,8 @@ function use_macros()
                gsub(sysconfdir, "%{_sysconfdir}", $c)
        }
 
+       gsub(docdir, "%{_docdir}")
+
        for (c = 1; c <= NF; c++) {
                if ($c ~ datadir "/automake")
                        continue;
@@ -890,22 +923,24 @@ function use_macros()
                gsub(datadir, "%{_datadir}", $c)
        }
 
-       gsub("%_sbindir", "%{_sbindir}")
-       gsub("%_mandir", "%{_mandir}")
-       gsub("%name", "%{name}")
-
        gsub("%{prefix}/share", "%{_datadir}")
        if (prefix"/share" == datadir)
                gsub("%{_prefix}/share", "%{_datadir}")
 
-       gsub(includedir, "%{_includedir}")
+       # CFLAGS="-I/usr/include/ncurses is usually correct.
+       if (!/-I\/usr\/include/) {
+               gsub(includedir, "%{_includedir}")
+       }
+
        gsub("%{prefix}/include", "%{_includedir}")
-       if (prefix"/include" == includedir)
+       if (prefix"/include" == includedir) {
                gsub("%{_prefix}/include", "%{_includedir}")
+       }
 
        gsub(mandir, "%{_mandir}")
-       if ($0 !~ "%{_datadir}/manual")
+       if ($0 !~ "%{_datadir}/manual") {
                gsub("%{_datadir}/man", "%{_mandir}")
+       }
        gsub("%{_prefix}/share/man", "%{_mandir}")
        gsub("%{prefix}/share/man", "%{_mandir}")
        gsub("%{prefix}/man", "%{_mandir}")
@@ -941,12 +976,24 @@ function use_macros()
                                        continue;
                                if ($c ~ prefix "/lib/pkgconfig")
                                        continue;
+
+                               # CFLAGS="-I/usr..." is usually correct.
+                               if (/-I\/usr/)
+                                       continue;
+                               # same for LDFLAGS="-L/usr..."
+                               if (/-L\/usr/)
+                                       continue;
+
                                gsub(prefix, "%{_prefix}", $c)
                        }
                }
                gsub("%{prefix}", "%{_prefix}")
        }
 
+       # replace back
+       gsub("%{_includedir}/ncurses", "/usr/include/ncurses")
+       gsub("%{_includedir}/freetype", "/usr/include/freetype")
+
        gsub("%{PACKAGE_VERSION}", "%{version}")
        gsub("%{PACKAGE_NAME}", "%{name}")
 
@@ -975,6 +1022,9 @@ function use_macros()
        gsub("%_bindir", "%{_bindir}")
        gsub("%_datadir", "%{_datadir}")
        gsub("%_iconsdir", "%{_iconsdir}")
+       gsub("%_sbindir", "%{_sbindir}")
+       gsub("%_mandir", "%{_mandir}")
+       gsub("%name", "%{name}")
 
        gsub("/usr/src/linux", "%{_kernelsrcdir}")
        gsub("%{_prefix}/src/linux", "%{_kernelsrcdir}")
@@ -1067,6 +1117,9 @@ function use_files_macros(        i, n, t, a)
        # sort %verify attrs
        if (match($0, /%verify\(not([^)]+)\)/)) {
                t = substr($0, RSTART, RLENGTH)
+               # kill commas: %verify(not,md5,size,mtime)
+               gsub(/,/, " ", t);
+
                gsub(/^%verify\(not |\)$/, "", t)
                n = split(t, a, / /)
                isort(a, n)
This page took 0.101003 seconds and 4 git commands to generate.