+++ /dev/null
-#!/usr/bin/gawk -f
-#
-# Adapter adapts .spec files for PLD Linux.
-#
-# Copyright (C) 1999-2013 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>
-# Jakub Bogusz <qboosh@pld-linux.org>
-# Elan Ruusamäe <glen@pld-linux.org>
-#
-# See git log adapter{,.awk} for list of contributors
-#
-# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
-
-# TODO
-# - really long sourceX make preamble sorting totally fcked up (try snake.spec r1.1)
-# - parse ../PLD-doc/BuildRequires.txt and setup proper BR epoches?
-# - add "-nc" option to skip CVS interaction
-# - sort Summary(XX)
-# - sort Requires, BuildRequires
-# - check if %description (lang=C) contains 8bit
-# - desc wrapping is totally fucked up on global.spec,1.25, dosemu.spec,1.115-
-# - it should change: /%source([0-9]+)/i to %{SOURCE\1}
-# - extra quote on LDFLAGS line: https://bugs.launchpad.net/pld-linux/+bug/385836
-# - %{with_foo:%attr()...} gets converted to %attr() %{with_foo:...} [vlc.spec]
-# - 'R: foo ' (with traliling space) gets coverted to "R: foo\nR: " [vlc.spec @ 1.199 ]
-
-BEGIN {
- RPM_SECTIONS = "package|build|changelog|clean|description|install|post|posttrans|postun|pre|prep|pretrans|preun|triggerin|triggerpostun|triggerun|verifyscript|check"
- SECTIONS = "^%(" RPM_SECTIONS ")"
-
- rev = "1.514"
- VERSION = "0.36/" rev
-
- 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))"
-
- usedigest = 0 # Enable to switch to rpm 4.4.6+ md5 digests
-
- preamble = 1 # Is it part of preamble? Default - yes
- bod = 0 # Beginning of %description
- tw = 70 # Descriptions width
-
- b_idx = 0 # index of BR/R arrays
- BR_count = 0 # number of additional BuildRequires
-
- # If variable removed, then 1 (for removing it from export)
- removed["LDFLAGS"] = 0
- removed["CFLAGS"] = 0
- removed["CXXFLAGS"] = 0
-
- # If 1, we are inside of comment block (started with /^#%/)
- comment_block = 0
-
- import_rpm_macros()
-
- packages_dir = topdir
- groups_file = packages_dir "/../rpm-build-tools/rpm.groups"
-
- system("[ -d ../PLD-doc ] && cd ../PLD-doc && ([ -f BuildRequires.txt ] || cvs up BuildRequires.txt >/dev/null)");
-}
-
-# If the latest line matched /%files/
-defattr == 1 {
- 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
-}
-
-# call mktemp(1) and return the value
-function mktemp(template, tmp) {
- "mktemp " template | getline tmp
- return tmp
-}
-
-function b_makekey(a, b, s) {
- s = a "" b;
- # kill bcond
- gsub(/[#%]+{[!?]+[_a-zA-Z0-9]+:/, "", s);
-
- # kill commented out items
- gsub(/^#[ \t]*/, "", s);
-
- # force order
- gsub(/^Summary\(/, "11Summary(", s);
- gsub(/^Summary/, "10Summary", s);
-
- gsub(/^Name/, "2Name", s);
- gsub(/^Version/, "3Version", s);
- gsub(/^Release/, "4Release", s);
- gsub(/^Epoch/, "5Epoch", s);
- gsub(/^License/, "5License", s);
- gsub(/^Group/, "6Group", s);
- gsub(/^URL/, "7URL", s);
-
- gsub(/^BuildRequires/, "B1BuildRequires", s);
- gsub(/^BuildConflicts/, "B2BuildConflicts", s);
-
- gsub(/^Suggests/, "X1Suggests", s);
- gsub(/^Provides/, "X2Provides", s);
- gsub(/^Obsoletes/, "X3Obsoletes", s);
- gsub(/^Conflicts/, "X4Conflicts", s);
- gsub(/^BuildArch/, "X5BuildArch", s);
- gsub(/^ExclusiveArch/, "X6ExclusiveArch", s);
- gsub(/^ExcludeArch/, "X7ExcludeArch", s);
- gsub(/^BuildRoot/, "X9BuildRoot", s);
-
- gsub(/^AutoProv/, "Xx1AutoProv", s);
- gsub(/^AutoReq/, "Xx2AutoReq", s);
-
-# printf("%s -> %s\n", a""b, s);
- return s;
-}
-
-# Comments
-/^#/ && (description == 0) {
- if (/This file does not like to be adapterized!/) {
- print # print this message
- while (getline) # print the rest of spec as it is
- print
- do_not_touch_anything = 1 # do not touch anything in END()
- exit(rc = 0)
- }
-
- # Generally, comments are printed without touching
- sub(/[ \t]+$/, "")
-
- if (/#[ \t]*Source.*md5/) {
- if (usedigest == 1) {
- sub(/^#[ \t]*Source/, "BuildRequires:\tdigest(%SOURCE", $0)
- sub(/-md5[ \t]*:[ \t]*/, ") = ", $0)
- }
- print $0
- next
- }
-}
-
-/^%define/ {
- # Remove defining _applnkdir (this macro has been included in rpm-3.0.4)
- if ($2 == "_applnkdir") {
- next
- }
-
- # FIXME: this section will likely never match after cvs->git migration
- if ($2 == "date") {
- if (did_files == 0) {
- print "%files"
- print ""
- did_files = 1
- }
- }
-
- # Do not add %define of _prefix if it already is.
- if ($2 ~ /^_prefix/) {
- sub("^"prefix, $3, bindir)
- sub("^"prefix, $3, sbindir)
- sub("^"prefix, $3, libdir)
- sub("^"prefix, $3, datadir)
- sub("^"prefix, $3, includedir)
- prefix = $3
- }
-
- if ($2 ~ /_bindir/ && !/_sbindir/)
- bindir = $3
- if ($2 ~ /_sbindir/)
- sbindir = $3
- if ($2 ~ /_libdir/) {
- if ($3 ~ /^%\(/) {
- # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.")
- libdir = "%%%%%%%%%%%%%%"
- } else {
- libdir = $3
- }
- }
- if ($2 ~ /_sysconfdir/) {
- if ($3 ~ /^%\(/) {
- # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.")
- sysconfdir = "%%%%%%%%%%%%%%"
- } else {
- sysconfdir = $3
- }
- }
- if ($2 ~ /_datadir/) {
- if ($3 ~ /^%\(/) {
- # TODO: should escape for latter checks like: ($c ~ sysconfdir "/{?cron.")
- datadir = "%%%%%%%%%%%%%%"
- } else {
- datadir = $3
- }
- }
- if ($2 ~ /_includedir/)
- includedir = $3
- if ($2 ~ /_mandir/)
- mandir = $3
- if ($2 ~ /_infodir/)
- infodir = $3
- if ($2 ~ /_docdir/)
- docdir = $3
-
- # version related macros
- if ($2 ~ /^_beta$/)
- _beta = $3
- if ($2 ~ /^_rc$/)
- _rc = $3
- if ($2 ~ /^_pre$/)
- _pre = $3
- if ($2 ~ /^_snap$/)
- _snap = $3
- if ($2 ~ /^subver$/)
- subver = $3
-
- # these are used usually when adapterizing external spec
- if ($2 ~ /^name$/)
- name = $3
- if ($2 ~ /^version$/)
- version = $3
- if ($2 ~ /^release$/)
- release = $3
-
- if ($2 ~ /^mod_name$/)
- mod_name = $3
- if ($2 ~ /^_?pearname$/)
- pearname = $3
- if ($2 ~ /^_class$/)
- pear_class = $3
- if ($2 ~ /^_subclass$/)
- pear_subclass = $3
-
- # kill the _class and _subclass pear macros
- if ($2 == "_pearname" || $2 == "pearname") {
- if (pear_class) {
- gsub("%{_class}", pear_class, $3);
- }
- if (pear_subclass) {
- gsub("%{_subclass}", pear_subclass, $3);
- }
- }
-
- sub(/[ \t]+$/, "");
- # do nothing further, otherwise adapter thinks we're at preamble
- print
- next
-}
-
-# Obsolete
-/^%include.*\/usr\/lib\/rpm\/macros\.python$/ {
- next
-}
-
-################
-# %description #
-################
-/^%description/, (!/^%description/ && $0 ~ SECTIONS) {
- preamble = 0
-
- if (/^%description/) {
- bod++
- format_line = ""
- format_indent = -1
- }
-
- # Format description
- if (ENVIRON["SKIP_DESC"] != 1 && description == 1 && !/^%[a-z]+/ && !/^%description/) {
- if (/^[ \t]*$/) {
- format_flush(format_line, format_indent)
- print ""
- format_line = ""
- format_indent = -1
- } else if (/^[ \t]*[-\*][ \t]*/) {
- format_flush(format_line, format_indent)
- match($0, /^[ \t]*/)
- format_indent = RLENGTH
- match($0, /^[ \t]*[-\*][ \t]/)
- format_line = substr($0, RLENGTH)
- } else
- format_line = format_line " " $0
- next
- }
-
- if (/^%[a-z]+/ && (!/^%description/ || bod == 2)) {
- if (NF > 3 && $2 == "-l") {
- ll = $1
- for (i = 4; i <= NF; i++)
- ll = ll " " $i
- $0 = ll " -l " $3
- }
- format_flush(format_line, format_indent)
- if (bod == 2) {
- bod = 1
- description = 1
- } else {
- bod = 0
- description = 0
- }
- } else
- description = 1
-}
-
-#########
-# %prep #
-#########
-/^%prep/, (!/^%prep/ && $0 ~ SECTIONS) {
- preamble = 0
- did_prep = 1
-
- use_macros()
-
- # Add '-q' to %setup
- if (/^%setup/ && !/-q/) {
- sub(/^%setup/, "%setup -q")
- }
-
- if (/^%setup/ && name != "setup") {
- $0 = fixedsub(name, "%{name}", $0);
- $0 = fixedsub(version, "%{version}", $0);
- if (_beta) {
- $0 = fixedsub(_beta, "%{_beta}", $0);
- }
- if (_rc) {
- $0 = fixedsub(_rc, "%{_rc}", $0);
- }
- if (_pre) {
- $0 = fixedsub(_pre, "%{_pre}", $0);
- }
- if (_snap) {
- $0 = fixedsub(_snap, "%{_snap}", $0);
- }
- if (subver) {
- $0 = fixedsub(subver, "%{subver}", $0);
- }
- }
-
- if (/^%setup/ && /-n %{name}-%{version}( |$)/) {
- $0 = fixedsub(" -n %{name}-%{version}", "", $0)
- }
- sub("^%patch ", "%patch0 ");
-
- # fedora extras
- if (/^%apply/) {
- sub("^%apply -n", "%patch");
- }
-
- # invalid in %prep
- sub("^rm -rf \$RPM_BUILD_ROOT.*", "");
-}
-
-##########
-# %build #
-##########
-/^%build/, (!/^%build/ && $0 ~ SECTIONS) {
- preamble = 0
-
- if (did_prep == 0) {
- print "%prep"
- print ""
- did_prep = 1
- }
-
- use_macros()
- use_tabs()
-
- if (/^automake$/)
- sub(/$/, " -a -c")
-
- if (/LDFLAGS/) {
- if (/LDFLAGS="-s"/) {
- removed["LDFLAGS"] = 1
- next
- } else {
- split($0, tmp, "LDFLAGS=")
- count = split(tmp[2], flags, "\"")
- if (flags[1] != "" && flags[1] !~ "!?debug") {
- sub(/-s[" ]?/, "%{rpmldflags} ", flags[1])
- $0 = tmp[1] line[1] "LDFLAGS=" flags[1] "\""
- for (i = 2; i < count; i++)
- $0 = $0 flags[i] "\""
- }
- }
- }
-
- if (/CFLAGS=/)
- if (cflags("CFLAGS") == 0)
- next
-
- if (/CXXFLAGS=/)
- if (cflags("CXXFLAGS") == 0)
- next
-
- if (/^export /) {
- if (removed["LDFLAGS"])
- sub(" LDFLAGS", "")
- if (removed["CFLAGS"])
- sub(" CFLAGS", "")
- if (removed["CXXFLAGS"])
- sub(" CXXFLAGS", "")
- # Is there still something?
- if (/^export[ ]*$/)
- next
- }
-
- # quote CC
- if (/CC=%{__cc} /) {
- sub("CC=%{__cc}", "CC=\"%{__cc}\"")
- }
-
- # use PLD Linux macros
- $0 = fixedsub("glib-gettextize --copy --force","%{__glib_gettextize}", $0);
- $0 = fixedsub("intltoolize --copy --force", "%{__intltoolize}", $0);
- $0 = fixedsub("automake --add-missing --copy", "%{__automake}", $0);
- $0 = fixedsub("automake -a --foreign --copy", "%{__automake}", $0);
- $0 = fixedsub("automake -a -c --foreign", "%{__automake}", $0);
- $0 = fixedsub("automake -a -c", "%{__automake}", $0);
- $0 = fixedsub("libtoolize --force --automake --copy", "%{__libtoolize}", $0);
- $0 = fixedsub("libtoolize -c -f --automake", "%{__libtoolize}", $0);
-
- sub(/^aclocal$/, "%{__aclocal}");
- sub(/^autoheader$/, "%{__autoheader}");
- sub(/^autoconf$/, "%{__autoconf}");
- sub(/^automake$/, "%{__automake}");
- sub(/^libtoolize$/, "%{__libtoolize}");
-
- # atrpms
- $0 = fixedsub("%perl_configure", "%{__perl} Makefile.PL \\\n\tINSTALLDIRS=vendor", $0);
- $0 = fixedsub("%perl_makecheck", "%{?with_tests:%{__make} test}", $0);
-
- # alt linux
- $0 = fixedsub("%make_build", "%{__make}", $0);
-}
-
-##########
-# %clean #
-##########
-/^%clean/, (!/^%clean/ && $0 ~ SECTIONS) {
- did_clean = 1
-
- use_macros()
-}
-
-############
-# %install #
-############
-/^%install/, (!/^%install/ && $0 ~ SECTIONS) {
-
- preamble = 0
-
- # foreign rpms
- sub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT")
- sub("%buildroot", "$RPM_BUILD_ROOT");
- sub("%{buildroot}", "$RPM_BUILD_ROOT");
-
- if (/^[ \t]*rm([ \t]+-[rf]+)*[ \t]+(\${?RPM_BUILD_ROOT}?|%{?buildroot}?)/ && did_rmroot==0) {
- did_rmroot=1
- print "rm -rf $RPM_BUILD_ROOT"
- next
- }
-
- if (!/^(#?[ \t]*)$/ && !/^%install/ && did_rmroot==0) {
- print "rm -rf $RPM_BUILD_ROOT"
- did_rmroot=1
- }
-
- if (tmpdir) {
- buildroot = tmpdir "/" name "-" version "-root-" ENVIRON["USER"]
- gsub(buildroot, "$RPM_BUILD_ROOT")
- }
-
- if (!/%{_lib}/) {
- sub("\$RPM_BUILD_ROOT/%", "$RPM_BUILD_ROOT%")
- }
-
- use_macros()
-
- # 'install -d' instead 'mkdir -p'
- if (/mkdir -p/)
- sub(/mkdir -p/, "install -d")
-
- # cp -a already implies cp -r
- sub(/^cp -ar/, "cp -a")
-
- # No '-u root' or '-g root' for 'install'
- if (/^install/ && /-[ug][ \t]*root/)
- gsub(/-[ug][ \t]*root /, "")
-
- if (/^install/ && /-m[ \t]*[0-9]+/)
- gsub(/-m[ \t]*[0-9]+ /, "")
-
- # No lines contain 'chown' or 'chgrp' if owner/group is 'root'
- if (($1 ~ /chown/ && $2 ~ /root\.root/) || ($1 ~ /chgrp/ && $2 ~ /root/))
- next
-
- # No lines contain 'chmod' if it sets the modes to '644'
- if ($1 ~ /chmod/ && $2 ~ /644/)
- next
-
- # atrpms
- $0 = fixedsub("%perl_makeinstall", "%{__make} pure_install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0);
-
- # alt linux
- $0 = fixedsub("%make_install DESTDIR=$RPM_BUILD_ROOT install", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT", $0);
-}
-
-##########
-# %files #
-##########
-/^%files/, (!/^%files/ && $0 ~ SECTIONS) {
- preamble = 0
- did_files = 1
-
- if ($0 ~ /^%files/)
- defattr = 1
-
- if (!use_files_macros()) {
- next
- }
-}
-
-###########
-# SCRIPTS #
-###########
-/^%pre/, (!/^%pre/ && $0 ~ SECTIONS) {
- preamble = 0
-
- if (gsub("/usr/sbin/useradd", "%useradd")) {
- sub(" 2> /dev/null \|\| :", "");
- sub(" >/dev/null 2>&1 \|\|:", "");
- }
-
- # fedora extras macros
- if (/%__fe_useradd/) {
- sub("%__fe_useradd", "%useradd -u ");
- sub(" 2> /dev/null \|\| :", "");
- sub(" >/dev/null 2>&1 \|\|:", "");
- sub(" &>/dev/null \\|\\| :", "");
- }
-
- if (/%__fe_groupadd/) {
- sub("%__fe_groupadd", "%groupadd -g ");
- sub(" &>/dev/null \\|\\| :", "");
- }
-
- # %useradd and %groupadd may not be wrapped
- if (/%(useradd|groupadd).*\\$/) {
- a = $0; getline;
- sub(/^[\s\t]*/, "");
- $0 = substr(a, 1, length(a) - 1) $0;
- }
- use_script_macros()
-}
-
-/^%post/, (!/^%post/ && $0 ~ SECTIONS) {
- preamble = 0
-
- # fedora extras macros
- sub("%__chkconfig", "/sbin/chkconfig");
-
- sub("update-desktop-database &> /dev/null \\|\\| :", "%update_desktop_database");
- sub("touch --no-create %{_datadir}/icons/hicolor", "%update_icon_cache_post hicolor");
- sub("if \\[ -x %{_bindir}/gtk-update-icon-cache \\]; then\n\t%{_bindir}/gtk-update-icon-cache -q %{_datadir}/icons/hicolor \|\| :\nfi", "");
-
- sub("export GCONF_CONFIG_SOURCE=`gconftool-2 --get-default-source`", "")
- if (/gconftool-2 --makefile-install-rule/) {
- sub("gconftool-2 --makefile-install-rule %{_sysconfdir}/gconf/schemas/", "%gconf_schema_install ")
- sub("> /dev/null", "");
- }
-
- use_macros()
-}
-/^%preun/, (!/^%preun/ && $0 ~ SECTIONS) {
- preamble = 0
- use_macros()
-}
-/^%postun/, (!/^%postun/ && $0 ~ SECTIONS) {
- preamble = 0
-
- # fedora extras macros
- if (/%__fe_userdel|%__fe_groupdel/) {
- sub("%__fe_groupdel", "%groupremove");
- sub("%__fe_userdel", "%userremove");
- sub(" &>/dev/null \\|\\| :", "");
- }
-
- use_script_macros()
-}
-/^%triggerin/, (!/^%triggerin/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-/^%triggerun/, (!/^%triggerun/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-/^%triggerpostun/, (!/^%triggerpostun/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-/^%pretrans/, (!/^%pretrans/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-/^%posttrans/, (!/^%posttrans/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-/^%verifyscript/, (!/^%verifyscript/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-/^%check/, (!/^%check/ && $0 ~ SECTIONS) {
- preamble = 0
- use_script_macros()
-}
-
-#############
-# PREAMBLES #
-#############
-preamble == 1 {
- # There should not be a space after the name of field
- # and before the colon.
- sub(/[ \t]*:/, ":")
-
- if (/^%perl_module_wo_prefix/) {
- name = $2
- version = $3
- release = "0." fixedsub(".%{disttag}.at", "", $4)
- }
-
- # deprecated. currently just resolves to name in $2
- if (/^%pyrequires_eq.+/) {
- $1 = "Requires:";
- }
-
- # F<16 had requires(hint)
- if (/^Requires\(hint\):/) {
- $1 = "Suggests:";
- }
-
- field = tolower($1)
- if (field ~ /summary:/ && !/etc\.$/ && !/Inc\.$/) {
- sub(/\.$/, "", $0);
- }
- if (field ~ /group(\([^)]+\)):/) {
- next
- }
-
- if (field == "group:") {
- format_preamble()
- group = $0;
- sub(/^[^ \t]*[ \t]*/, "", group);
- group = replace_groupnames(group);
- $0 = "Group:\t\t" group
-
- byl_plik_z_groupmi = 0
- byl_opis_grupy = 0
- while ((getline linia_grup < groups_file) > 0) {
- byl_plik_z_groupmi = 1
- if (linia_grup == group) {
- byl_opis_grupy = 1
- break
- }
- }
-
- if (!byl_plik_z_groupmi)
- print "######\t\t" groups_file ": no such file"
- else if (!byl_opis_grupy)
- print "######\t\t" "Unknown group!"
-
- close(groups_file)
- did_groups = 1
- }
-
- if (field == "prereq:") {
- sub(/Pre[Rr]eq:/, "Requires:", $1);
- }
-
- # split (build)requires, obsoletes on commas
- if (field ~ /(obsoletes|requires|provides|conflicts|suggests):/ && NF > 2) {
- value = substr($0, index($0, $2));
- $0 = format_requires($1, value);
- }
-
- # BR: tar (and others) is to common (rpm-build requires it)
- if (field == "buildrequires:") {
- l = substr($0, index($0, $2));
- if (l == "awk" ||
- l == "binutils" ||
- l == "bzip2" ||
- l == "cpio" ||
- l == "diffutils" ||
- l == "elfutils" ||
- l == "fileutils" ||
- l == "findutils" ||
- l == "glibc-devel" ||
- l == "grep" ||
- l == "gzip" ||
- l == "make" ||
- l == "patch" ||
- l == "sed" ||
- l == "sh-utils" ||
- l == "tar" ||
- l == "textutils") {
- next
- }
-
- replace_requires(field);
- }
-
- if (field == "requires:" || field ~ /^requires\(/) {
- replace_requires(field);
- }
-
-
- # obsolete/unwanted tags
- if (field ~ /vendor:|packager:|distribution:|docdir:|prefix:|icon:|author:|author-email:|metadata-version:/) {
- next
- }
-
- if (field ~ /buildroot:/) {
- $0 = $1 "%{tmpdir}/%{name}-%{version}-root-%(id -u -n)"
- did_build_root = 1
- }
-
- # Use "License" instead of "Copyright" if it is (L)GPL or BSD
- if (field ~ /copyright:/ && $2 ~ /GPL|BSD/) {
- $1 = "License:"
- }
-
- # ease updating from debian .dsc
- if (field ~ /homepage:/) {
- $1 = "URL:"
- }
-
- # suse
- if (field ~ /recommends:/) {
- $1 = "Suggests:"
- }
-
- if ($3 == "==" && $1 !~ /%/) {
- $3 = "="
- }
-
- if (field ~ /license:/) {
- l = substr($0, index($0, $2));
- if (l == "Python Software Foundation License") {
- l = "PSF"
- }
- 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" || \
- l == "ASL 2.0" \
- ) {
- l = "Apache v2.0"
- }
- if (l == "Apache Group License" || l == "Apache Software License" || l == "Apache License") {
- l = "Apache"
- }
- if (l == "Apache-style License" || l == "Apache-style Software License") {
- l = "Apache-like"
- }
- if (l == "Apache Software License 1.1" || l == "Apache 1.1") {
- l = "Apache v1.1"
- }
- if (l == "GPLv2") {
- l = "GPL v2"
- }
- if (l == "GPLv2+") {
- l = "GPL v2+"
- }
- if (l == "GPL v2 or later") {
- l = "GPL v2+"
- }
- if (l == "LGPL v2.0 only") {
- l = "LGPL v2"
- }
- if (l == "LGPLv2+") {
- l = "LGPL v2+"
- }
- if (l == "GPLv3") {
- l = "GPL v3"
- }
- if (l == "GPLv3+") {
- l = "GPL v3+"
- }
- if (l == "MPLv1.1") {
- l = "MPL v1.1"
- }
- $0 = "License:\t" l;
- }
-
-
- if (field ~ /name:/) {
- if ($2 == "%{name}" && name) {
- $2 = name
- }
- name = $2
- name_seen = 1;
- }
-
- if (field ~ /version:/) {
- if ($2 == "%{version}" && version) {
- $2 = version
- }
- version = $2
- version_seen = 1;
- }
-
- if (field ~ /release:/) {
- if ($2 == "%{release}" && release) {
- $2 = release
- }
- sub(/%atrelease /, "0.", $0)
- release = $2
- release_seen = 1;
- }
-
-
- if (field ~ /serial:/)
- $1 = "Epoch:"
-
- if (field ~ /home-page:/)
- $1 = "URL:"
-
- # proper caps
- if (field ~ /^url:$/)
- $1 = "URL:"
-
- if (field ~ /^patch/)
- $1 = "Patch" substr(field, 6);
-
- if (field ~ /^description:$/)
- $1 = "\n%description\n"
-
- # Use %{name} and %{version} in the filenames in "Source:"
- if (field ~ /^source/ || field ~ /patch/) {
- n = split($2, url, /\//)
- if (url[n] ~ /\.gz$/) {
- url[n+1] = ".gz" url[n+1]
- sub(/\.gz$/,"",url[n])
- }
- if (url[n] ~ /\.zip$/) {
- url[n+1] = ".zip" url[n+1]
- sub(/\.zip$/,"",url[n])
- }
- if (url[n] ~ /\.tar$/) {
- url[n+1] = ".tar" url[n+1]
- sub(/\.tar$/,"",url[n])
- }
- if (url[n] ~ /\.patch$/) {
- url[n+1] = ".patch" url[n+1]
- sub(/\.patch$/,"",url[n])
- }
- if (url[n] ~ /\.bz2$/) {
- url[n+1] = ".bz2" url[n+1]
- sub(/\.bz2$/,"",url[n])
- }
- if (url[n] ~ /\.logrotate$/) {
- url[n+1] = ".logrotate" url[n+1]
- sub(/\.logrotate$/,"",url[n])
- }
- if (url[n] ~ /\.pamd$/) {
- url[n+1] = ".pamd" url[n+1]
- sub(/\.pamd$/,"",url[n])
- }
-
- # allow %{name} only in last url component
- s = ""
- for (i = 1; i <= n; i++) {
- url[i] = fixedsub("%{name}", name, url[i])
- if (s) {
- s = s "/" url[i]
- } else {
- s = url[i]
- }
- }
- $2 = s url[n+1]
-
- filename = url[n]
- if (name) {
- url[n] = fixedsub(name, "%{name}", url[n])
- }
- if (field ~ /source/) {
- if (version) {
- url[n] = fixedsub(version, "%{version}", url[n])
- }
- if (_beta) {
- url[n] = fixedsub(_beta, "%{_beta}", url[n])
- }
- if (_rc) {
- url[n] = fixedsub(_rc, "%{_rc}", url[n])
- }
- if (_pre) {
- url[n] = fixedsub(_pre, "%{_pre}", url[n])
- }
- if (_snap) {
- url[n] = fixedsub(_snap, "%{_snap}", url[n])
- }
- if (subver) {
- url[n] = fixedsub(subver, "%{subver}", url[n])
- }
- }
- # assigning to $2 kills preamble formatting
- $2 = fixedsub(filename, url[n], $2)
-
- $2 = unify_url($2)
- }
-
-
- if (field ~ /^source:/)
- $1 = "Source0:"
-
- if (field ~ /^patch:/)
- $1 = "Patch0:"
-
- kill_preamble_macros();
- format_preamble()
-
- if (field ~ /requires/) {
- # atrpms
- $0 = fixedsub("%{eversion}", "%{epoch}:%{version}-%{release}", $0);
- }
-}
-
-/^%bcond_/ {
- # do nothing
- print
- next
-}
-
-# sort BR/R!
-#
-# NOTES:
-# - mixing BR/R and anything else confuses this (all will be sorted together)
-# 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["SKIP_SORTBR"] != 1 && preamble == 1 && $0 ~ PREAMBLE_TAGS ":", $0 ~ PREAMBLE_TAGS ":"{
- if ($1 ~ /Pre[Rr]eq:/) {
- sub(/Pre[Rr]eq:/, "Requires:", $1);
- }
- if ($1 == "BR:" ) {
- $1 = "BuildRequires:"
- }
- if ($1 == "R:" ) {
- $1 = "Requires:"
- }
- format_preamble()
-# kill_preamble_macros(); # breaks tabbing
-
- b_idx++;
- l = substr($0, index($0, $2));
- b_ktmp = b_makekey($1, l);
- b_key[b_idx] = b_ktmp;
- b_val[b_ktmp] = $0;
-
- next;
-}
-
-preamble == 1 {
- if (b_idx > 0) {
- isort(b_key, b_idx);
- for (i = 1; i <= b_idx; i++) {
- v = b_val[b_key[i]];
- sub(/[ \t]+$/, "", v);
- print "" v;
- }
- b_idx = 0
- }
-}
-
-# main() ;-)
-{
- preamble = 1
-
- sub(/[ \t]+$/, "")
- print
-
- if (name_seen == 0 && name) {
- print "Name:\t\t" name
- name_seen = 1
- }
-
- if (version_seen == 0 && version) {
- print "Version:\t" version
- version_seen = 1
- }
-
- if (release_seen == 0 && release) {
- print "Release:\t" release
- release_seen = 1
- }
-
- if (did_build_root == 0) {
-# print "BuildRoot:\t%{tmpdir}/%{name}-%{version}-root-%(id -u -n)"
- did_build_root = 1
- }
- if (did_groups == 0) {
-# print "Group:\t\tunknown"
- did_groups = 1
- }
-}
-
-
-END {
- if (do_not_touch_anything) {
- exit(rc)
- }
-
- # TODO: need to output these in proper place
- if (BR_count > 0) {
- for (i = 0; i <= BR_count; i++) {
- print BR[i];
- }
- }
-
- if (did_clean == 0) {
- print ""
- print "%clean"
- print "rm -rf $RPM_BUILD_ROOT"
- }
-}
-
-# substitutes fixed strings (not regexps)
-function fixedsub(s1,s2,t, ind) {
- if (ind = index(t,s1))
- t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1))
- return t
-}
-
-# replace s with s2 if it equals to s1
-function replace(s, s1, s2) {
- if (s == s1) {
- return s2;
- } else {
- return s;
- }
-}
-
-# There should be one or two tabs after the colon.
-function format_preamble()
-{
- if (/^#/ || /^%bcond_with/) {
- return;
- }
- sub(/:[ \t]*/, ":")
- if (match($0, /[A-Za-z0-9(),#_ \t.-]+[ \t]*:[ \t]*/) == 1) {
- if (RLENGTH < 8) {
- sub(/:/, ":\t\t")
- } else {
- sub(/:/, ":\t")
- }
- }
-}
-
-# Replace directly specified directories with macros
-function use_macros()
-{
- # -m, --skip-macros, --no-macros -- skip macros subst
- if (ENVIRON["SKIP_MACROS"]) {
- return
- }
-
- # leave inline sed lines alone
- if (/(%{__sed}|sed) -i -e/) {
- return;
- }
-
- sub("%{_defaultdocdir}", "%{_docdir}");
- sub("%{_datadir}/doc", "%{_docdir}");
- sub("%{_bindir}/perl", "%{__perl}");
- sub("%{_bindir}/python", "%{__python}");
-
- gsub(infodir, "%{_infodir}")
-
- gsub(perl_sitearch, "%{perl_sitearch}")
- gsub(perl_archlib, "%{perl_archlib}")
- gsub(perl_privlib, "%{perl_privlib}")
- gsub(perl_vendorlib, "%{perl_vendorlib}")
- gsub(perl_vendorarch, "%{perl_vendorarch}")
- gsub(perl_sitelib, "%{perl_sitelib}")
-
- gsub(py_sitescriptdir, "%{py_sitescriptdir}")
- gsub(py_sitedir, "%{py_sitedir}")
- gsub(py_scriptdir, "%{py_scriptdir}")
-
- gsub(py3_sitescriptdir, "%{py3_sitescriptdir}")
- gsub(py3_sitedir, "%{py3_sitedir}")
- gsub(py3_scriptdir, "%{py3_scriptdir}")
- gsub("%{python3_sitelib}", "%{py3_sitescriptdir}")
- gsub("%{python3_version}", "%{py3_ver}")
-
- gsub(ruby_archdir, "%{ruby_archdir}")
- gsub(ruby_libdir, "%{ruby_libdir}")
-
- gsub(ruby_sitearchdir, "%{ruby_sitearchdir}")
- gsub(ruby_sitelibdir, "%{ruby_sitelibdir}")
- gsub(ruby_sitedir, "%{ruby_sitedir}")
- gsub(ruby_vendorarchdir, "%{ruby_vendorarchdir}")
- gsub(ruby_vendorlibdir, "%{ruby_vendorlibdir}")
- gsub(ruby_vendordir, "%{ruby_vendordir}")
- gsub(ruby_rubylibdir, "%{ruby_rubylibdir}") # deprecated
- gsub(ruby_rdocdir, "%{ruby_rdocdir}")
- gsub(ruby_ridir, "%{ruby_ridir}")
-
- gsub("%{_unitdir}", "%{systemdunitdir}")
- gsub(systemdunitdir, "%{systemdunitdir}")
- gsub(systemdtmpfilesdir, "%{systemdtmpfilesdir}")
-
- gsub("%{_datadir}/applications", "%{_desktopdir}")
- gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}")
- gsub("%{_datadir}/java", "%{_javadir}")
-
- gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}")
- gsub(pkgconfigdir, "%{_pkgconfigdir}")
-
- gsub("%{_datadir}/pkgconfig", "%{_npkgconfigdir}")
- gsub(npkgconfigdir, "%{_npkgconfigdir}")
-
- gsub("%{_datadir}/locale", "%{_localedir}")
- gsub(localedir, "%{_localedir}")
-
- gsub(libdir, "%{_libdir}")
- gsub(javadir, "%{_javadir}")
-
- gsub(bindir, "%{_bindir}")
- gsub("%{prefix}/bin", "%{_bindir}")
- if (prefix"/bin" == bindir)
- gsub("%{_prefix}/bin", "%{_bindir}")
-
- for (c = 1; c <= NF; c++) {
- if ($c ~ sbindir "/fix-info-dir")
- continue;
- if ($c ~ sbindir "/webapp")
- continue;
- if ($c ~ sbindir "/ldconfig")
- continue;
- if ($c ~ sbindir "/chsh")
- continue;
- if ($c ~ sbindir "/usermod")
- continue;
- if ($c ~ sbindir "/chkconfig")
- continue;
- if ($c ~ sbindir "/installzope(product|3package)")
- continue;
- gsub(sbindir, "%{_sbindir}", $c)
- }
-
- gsub("%{prefix}/sbin", "%{_sbindir}")
- if (prefix"/sbin" == sbindir) {
- gsub("%{_prefix}/sbin", "%{_sbindir}")
- }
-
- for (c = 1; c <= NF; c++) {
- if ($c ~ sysconfdir "/{?cron.")
- continue;
- if ($c ~ sysconfdir "/{?crontab.d")
- continue;
- if ($c ~ sysconfdir "/{?env.d")
- continue;
- if ($c ~ sysconfdir "/{?modprobe.(d|conf)")
- continue;
- if ($c ~ sysconfdir "/{?udev")
- continue;
- if ($c ~ sysconfdir "/{?hotplug")
- continue;
- if ($c ~ sysconfdir "/{?logrotate.d")
- continue;
- if ($c ~ sysconfdir "/{?pam.d")
- continue;
- if ($c ~ sysconfdir "/{?profile.d")
- continue;
- if ($c ~ sysconfdir "/{?rc.d")
- continue;
- if ($c ~ sysconfdir "/{?security")
- continue;
- if ($c ~ sysconfdir "/{?skel")
- continue;
- if ($c ~ sysconfdir "/{?sysconfig")
- continue;
- if ($c ~ sysconfdir "/{?shrc.d")
- continue;
- if ($c ~ sysconfdir "/{?certs")
- continue;
- if ($c ~ sysconfdir "/{?X11")
- continue;
- if ($c ~ sysconfdir "/{?ld.so.conf.d")
- continue;
- if ($c ~ sysconfdir "/{?rpm")
- continue;
- if ($c ~ sysconfdir "/{?bash_completion.d")
- continue;
- if ($c ~ sysconfdir "/{?samba")
- continue;
- if ($c ~ sysconfdir "/{?xdg")
- continue;
- if ($c ~ sysconfdir "/shells")
- continue;
- if ($c ~ sysconfdir "/inittab")
- continue;
- if ($c ~ sysconfdir "/init")
- continue;
- if ($c ~ sysconfdir "/ppp")
- continue;
- if ($c ~ sysconfdir "/dbus-1")
- continue;
- if ($c ~ sysconfdir "/tmpwatch")
- continue;
- if ($c ~ sysconfdir "/acpi")
- continue;
- if ($c ~ sysconfdir "/apm")
- continue;
- if ($c ~ sysconfdir "/modules-load\.d")
- continue;
- gsub(sysconfdir, "%{_sysconfdir}", $c)
- }
-
- gsub(docdir, "%{_docdir}")
-
- gsub(kdedocdir, "%{_kdedocdir}")
-
- gsub(gtkdocdir, "%{_gtkdocdir}")
- gsub("%{_docdir}/gtk-doc/html", "%{_gtkdocdir}")
-
- gsub(php_pear_dir, "%{php_pear_dir}")
- gsub(php_data_dir, "%{php_data_dir}")
-
- for (c = 1; c <= NF; c++) {
- if ($c ~ datadir "/automake")
- continue;
- if ($c ~ datadir "/unsermake")
- continue;
- if ($c ~ datadir "/file/magic.mime")
- continue;
- gsub(datadir, "%{_datadir}", $c)
- }
-
- gsub("%{prefix}/share", "%{_datadir}")
- if (prefix"/share" == datadir)
- gsub("%{_prefix}/share", "%{_datadir}")
-
- # CFLAGS="-I/usr/include/ncurses is usually correct.
- if (!/-I\/usr\/include/) {
- gsub(includedir, "%{_includedir}")
- }
-
- gsub("%{prefix}/include", "%{_includedir}")
- if (prefix"/include" == includedir) {
- gsub("%{_prefix}/include", "%{_includedir}")
- }
-
- gsub(mandir, "%{_mandir}")
- if ($0 !~ "%{_datadir}/manual") {
- gsub("%{_datadir}/man", "%{_mandir}")
- }
- gsub("%{_prefix}/share/man", "%{_mandir}")
- gsub("%{prefix}/share/man", "%{_mandir}")
- gsub("%{prefix}/man", "%{_mandir}")
- gsub("%{_prefix}/man", "%{_mandir}")
-
- gsub(infodir, "%{_infodir}")
- gsub("%{prefix}/info", "%{_infodir}")
- gsub("%{_prefix}/info", "%{_infodir}")
-
- if (prefix !~ "/X11R6") {
- gsub("%{_datadir}/aclocal", "%{_aclocaldir}")
- }
-
- gsub(examplesdir, "%{_examplesdir}")
-
- if (prefix != "/") {
- # leave --with-foo=/usr alone
- if ($0 !~ "--with.*=.*" prefix) {
- for (c = 1; c <= NF; c++) {
- if ($c ~ prefix "/sbin/fix-info-dir")
- continue;
- if ($c ~ prefix "/sbin/webapp")
- continue;
- if ($c ~ prefix "/sbin/chsh")
- continue;
- if ($c ~ prefix "/sbin/usermod")
- continue;
- if ($c ~ prefix "/sbin/installzope(product|3package)")
- continue;
- if ($c ~ prefix "/share/automake")
- continue;
- if ($c ~ prefix "/share/unsermake")
- continue;
- if ($c ~ prefix "/lib/sendmail")
- 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}")
-
- gsub("^make$", "%{__make}")
- gsub("^make ", "%{__make} ")
- gsub("^gcc ", "%{__cc} ")
- gsub("^rm --interactive=never ", "%{__rm} ")
-
- # fedora
- gsub("%{ruby_sitearch}", "%{ruby_sitearchdir}")
- gsub("%{python_sitearch}", "%{py_sitedir}")
- gsub("%{python_sitelib}", "%{py_sitescriptdir}")
-
- # alt linux
- gsub("%_man1dir", "%{_mandir}/man1")
-
- # mandrake specs
- gsub("^%make$", "%{__make}")
- gsub("^%make ", "%{__make} ")
- gsub("^%makeinstall_std", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
- gsub("^%{makeinstall}", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
- gsub("^%makeinstall", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
- gsub("^%{__rm} -rf %{buildroot}", "rm -rf $RPM_BUILD_ROOT")
- gsub("^%{__install}", "install")
- gsub("%optflags", "%{rpmcflags}")
- gsub("%{compat_perl_vendorarch}", "%{perl_vendorarch}")
-
- gsub("^%{__make} install DESTDIR=\$RPM_BUILD_ROOT", "%{__make} install \\\n\tDESTDIR=$RPM_BUILD_ROOT")
- gsub("^fix-info-dir$", "[ ! -x /usr/sbin/fix-info-dir ] || /usr/sbin/fix-info-dir -c %{_infodir} >/dev/null 2>\\&1")
- $0 = fixedsub("%buildroot", "$RPM_BUILD_ROOT", $0)
- $0 = fixedsub("%{buildroot}", "$RPM_BUILD_ROOT", $0)
- $0 = fixedsub("CXXFLAGS=%{rpmcflags} %configure", "CXXFLAGS=%{rpmcflags}\n%configure", $0);
- $0 = fixedsub("%__install", "install", $0);
-
- # split configure line to multiple lines
- if (/%configure +$/) {
- sub( / +$/, "" );
- } else if (/%configure / && !/\\$/) {
- $0 = format_configure($0);
- }
-
- gsub("%_bindir", "%{_bindir}")
- gsub("%_datadir", "%{_datadir}")
- gsub("%_iconsdir", "%{_iconsdir}")
- gsub("%_sbindir", "%{_sbindir}")
- gsub("%_mandir", "%{_mandir}")
- gsub("%name", "%{name}")
- gsub(/%__rm/, "rm");
- gsub(/%__mkdir_p/, "install -d");
- gsub(/%__cp/, "cp");
- gsub(/%__ln_s/, "ln -s");
- gsub(/%__sed/, "%{__sed}");
- gsub(/%__cat/, "cat");
- gsub(/%__chmod/, "chmod");
-
- gsub("/usr/src/linux", "%{_kernelsrcdir}")
- gsub("%{_prefix}/src/linux", "%{_kernelsrcdir}")
-
- if (/^ant / || /^%{ant}/) {
- sub(/^ant/, "%ant")
- sub(/^%{ant}/, "%ant")
- add_br("BuildRequires: jpackage-utils");
- add_br("BuildRequires: rpmbuild(macros) >= 1.300");
- }
-
- $0 = fixedsub("%(%{__cc} -dumpversion)", "%{cc_version}", $0);
- $0 = fixedsub("%(%{__cxx} -dumpversion)", "%{cxx_version}", $0);
-
- # kill the _class and _subclass pear macros
- if (pear_class) {
- gsub("%{_class}", pear_class);
- }
- if (pear_subclass) {
- gsub("%{_subclass}", pear_subclass);
- }
-}
-
-function format_configure(line, n, a, s) {
- n = split(line, a, / /);
- s = a[1] " \\\n";
- for (i = 2; i <= n; i++) {
- s = s "\t" a[i] " \\\n"
- }
- return s
-}
-
-
-# insertion sort of A[1..n]
-# copied from mawk manual
-function isort(A,n, i,j,hold) {
- for (i = 2; i <= n; i++) {
- hold = A[j = i]
- while (A[j-1] > hold) {
- j-- ; A[j+1] = A[j]
- }
- A[j] = hold
- }
- # sentinel A[0] = "" will be created if needed
-}
-
-
-function use_files_macros( i, n, t, a, l)
-{
- use_macros()
-
- # skip comments
- if (/^#/) {
- return 1;
- }
-
- sub("^%doc %{_mandir}", "%{_mandir}")
-
- gsub("^%{_sbindir}", "%attr(755,root,root) %{_sbindir}")
- gsub("^%{_bindir}", "%attr(755,root,root) %{_bindir}")
-
- # uid/gid nobody is not valid in %files
- if (/%attr([^)]*nobody[^)]*)/ && !/FIXME/) {
- $0 = $0 " # FIXME nobody user/group can't own files! -adapter.awk"
- }
-
- # s[gu]id programs with globs are evil
- if (/%attr\([246]...,.*\*/ && !/FIXME/) {
- $0 = $0 " # FIXME no globs for suid/sgid files"
- }
-
- # replace back
- gsub("%{_sysconfdir}/cron\.d", "/etc/cron.d")
- gsub("%{_sysconfdir}/crontab\.d", "/etc/crontab.d")
- gsub("%{_sysconfdir}/logrotate\.d", "/etc/logrotate.d")
- gsub("%{_sysconfdir}/pam\.d", "/etc/pam.d")
- gsub("%{_sysconfdir}/profile\.d", "/etc/profile.d")
- gsub("%{_sysconfdir}/rc\.d", "/etc/rc.d")
- gsub("%{_sysconfdir}/security", "/etc/security")
- gsub("%{_sysconfdir}/skel", "/etc/skel")
- gsub("%{_sysconfdir}/sysconfig", "/etc/sysconfig")
- gsub("%{_sysconfdir}/certs", "/etc/certs")
- gsub("%{_sysconfdir}/init.d", "/etc/init.d")
- gsub("%{_sysconfdir}/dbus-1", "/etc/dbus-1")
- gsub("%{_sysconfdir}/pki", "/etc/pki")
- gsub("%{_sysconfdir}/tmpwatch", "/etc/tmpwatch")
-
- # /etc/init.d -> /etc/rc.d/init.d
- if (!/^\/etc\/init\.d$/) {
- gsub("/etc/init.d", "/etc/rc.d/init.d")
- }
-
- if (/\/etc\/rc\.d\/init\.d\// && !/functions/) {
- if (!/%attr.*\/etc\/rc\.d\/init\.d/) {
- $0 = "%attr(754,root,root) " $0
- }
- if (/^%attr.*\/etc\/rc\.d\/init\.d/ && !/^%attr\(754 *,/) {
- gsub("^%attr\\(... *,", "%attr(754,");
- }
- }
-
- if (/lib.+\.so\b/ && !/\.so$/ && !/^%attr.*/ && !/%exclude/) {
- $0 = "%attr(755,root,root) " $0
- }
-
- if (/%{perl_vendorarch}.*\.so$/ && !/^%attr.*/) {
- $0 = "%attr(755,root,root) " $0
- }
-
- # remove attrs from man pages
- if (/%{_mandir}/ && /^%attr/) {
- sub("^%attr\\(.*\\) *", "");
- }
-
- # /etc/sysconfig files
- # %attr(640,root,root) %config(noreplace) %verify(not size mtime md5) /etc/sysconfig/*
- # attr not required, allow default 644 attr
- if (!/network-scripts/ && !/%dir/ && !/\.d$/ && !/functions/ && !/\/etc\/sysconfig\/wmstyle/) {
- if (/\/etc\/sysconfig\// && /%config/ && !/%config\(noreplace/) {
- gsub("%config", "%config(noreplace)")
- }
-
- if (/\/etc\/sysconfig\// && !/%config\(noreplace/) {
- $NF = "%config(noreplace) " $NF
- }
-
- if (/\/etc\/sysconfig\// && /%attr\(755/) {
- gsub("^%attr\\(... *,", "%attr(640,");
- }
-
- if (/\/etc\/sysconfig\// && !/%verify/) {
- gsub("/etc/sysconfig", "%verify(not size mtime md5) /etc/sysconfig");
- }
- }
-
- # kill leading zeros
- if (/%attr\(0[1-9]/) {
- gsub("%attr\\(0", "%attr(")
- }
-
- # kill leading whitespace
- gsub(/^ +/, "");
-
- # kill default attrs
- gsub(/%dir %attr\(755,root,root\)/, "%dir");
- gsub(/%attr\(755,root,root\) %dir/, "%dir");
- if (!/%dir/) {
- gsub(/%attr\(644,root,root\) /, "");
- }
-
- # 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)
-
- s = "%verify(not"
- for (i = 1 ; i <= n; i++) {
- s = s " " a[i]
- }
- s = s ")"
-
- gsub(/%verify\(not[^)]+\)/, s)
- }
-
- if (/%{_mandir}/) {
- gsub("\.gz$", "*")
- gsub("%ext_man$", "*")
- }
-
- # locale dir and no %lang -> bad
- if (/%{_datadir}\/locale\/.*\// && !/%(dir|lang)/) {
- $(NF + 1) = "# FIXME consider using %find_lang"
- }
-
- # python egg-infos
- if (match($0, "^%{py_site(script)?dir}/.+-py"py_ver".egg-info$")) {
- # tests:
- #%{py_sitedir}/*-py2.4.egg-info
- #%{py_sitescriptdir}/GnuPGInterface-%{version}-py2.4.egg-info
- #%{py_sitescriptdir}/python_mpd-%{version}-py2.4.egg-info
- #%{py_sitescriptdir}/mechanize-0.1.6b-py2.4.egg-info
-
- l = index($0, "/");
- t = substr($0, 0, l);
- s = substr($0, l + 1, RLENGTH - l - length("-py"py_ver".egg-info"));
- if (match(s, "[^-]+$")) {
- if (RSTART > 1) {
- s = substr(s, 0, RSTART - 1);
- }
- print "%if \"%{py_ver}\" > \"2.4\""
- gsub(t "/.+.egg-info", t "/" s "-*.egg-info");
- print
- print "%endif"
- return 0;
- }
- }
-
- # atrpms
- $0 = fixedsub("%{perl_man1dir}", "%{_mandir}/man1", $0);
- $0 = fixedsub("%{perl_man3dir}", "%{_mandir}/man3", $0);
- $0 = fixedsub("%{perl_bin}", "%{_bindir}", $0);
-
- gsub(libdir "/pkgconfig", "%{_pkgconfigdir}");
- gsub("%{_libdir}/pkgconfig", "%{_pkgconfigdir}");
- gsub("%{_prefix}/lib/pkgconfig", "%{_pkgconfigdir}");
-
- gsub("%{_datadir}/applications", "%{_desktopdir}");
- gsub("%{_datadir}/icons", "%{_iconsdir}");
- gsub("%{_datadir}/pixmaps", "%{_pixmapsdir}");
- gsub("%{_datadir}/pear", "%{php_pear_dir}");
- gsub("%{_datadir}/php", "%{php_data_dir}");
-
- return 1
-}
-
-function use_script_macros()
-{
- if (gsub("/sbin/service", "%service")) {
- sub(" >/dev/null 2>&1 \|\|:", "");
- sub(" 2> /dev/null \|\| :", "");
- }
-}
-
-function fill(ch, n, i) {
- for (i = 0; i < n; i++)
- printf("%c", ch)
-}
-
-function format_flush(line, indent, newline, word, first_word) {
- first_word = 1
- if (format_indent == -1)
- newline = ""
- else
- newline = fill(" ", format_indent) "- "
-
- while (match(line, /[^\t ]+/)) {
- word = substr(line, RSTART, RLENGTH)
- if (length(newline) + length(word) + 1 > tw) {
- print newline
-
- if (format_indent == -1)
- newline = ""
- else
- newline = fill(" ", format_indent + 2)
- first_word = 1
- }
-
- if (first_word) {
- newline = newline word
- first_word = 0
- } else
- newline = newline " " word
-
- line = substr(line, RSTART + RLENGTH)
- }
- if (newline ~ /[^\t ]/) {
- print newline
- }
-}
-
-function cflags(var)
-{
- if ($0 == var "=\"$RPM_OPT_FLAGS\"") {
- removed[var] = 1
- return 0
- }
-
- if (!/!\?debug/)
- sub("\$RPM_OPT_FLAGS", "%{rpmcflags}")
- return 1
-}
-
-# return whole matched pattern
-function matchstr(str, pat)
-{
- match(str, "[^/]+$");
- return substr(str, RSTART, RLENGTH);
-}
-
-function unify_url(url)
-{
-
- # sourceforge urls
- # Docs about sourceforge mirror system: http://sourceforge.net/apps/trac/sourceforge/wiki/Mirrors
-
- # 1. unify domains
- sub("^http://prdownloads\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
- sub("^http://download\.sf\.net/", "http://downloads.sourceforge.net/", url)
- sub("^http://download\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
- sub("^http://dl\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
- sub("^http://.*\.dl\.sourceforge\.net/", "http://downloads.sourceforge.net/", url)
- sub("^http://dl\.sf\.net/", "http://downloads.sourceforge.net/", url)
- sub("^http://downloads\.sourceforge\.net/sourceforge/", "http://downloads.sourceforge.net/", url)
-
- # 3. unify urls
- if (url ~ /sourceforge.net/) {
- sub("[?&]big_mirror=.*$", "", url);
- sub("[?&]modtime=.*$", "", url);
- sub("[?]use_mirror=.*$", "", url);
- sub("[?]download$", "", url);
- sub("/download$", "", url);
- }
-
- # SF: new style urls, strip "files/" between and prepend dl.
- if (match(url, "^http://sourceforge.net/projects/[^/]+/files/")) {
- url = substr(url, 1, RLENGTH - length("files/")) substr(url, RSTART + RLENGTH);
- sub("^http://sourceforge.net/projects/", "http://downloads.sourceforge.net/project/", url);
- }
-
- # SF unify: http://downloads.sourceforge.net/PROJECT/TARBALL
- # http://downloads.sourceforge.net/project/PROJECT/FILE/VERSION/%{name}-%{version}.zip
- if (match(url, "^http://downloads.sourceforge.net/project/[^/]+")) {
- url = sprintf("http://downloads.sourceforge.net/%s/%s", substr(url, 42, RLENGTH - 41), matchstr(url, "[^/]+$"));
- }
-
- sub("^ftp://ftp\.gnome\.org/", "http://ftp.gnome.org/", url)
- sub("^http://ftp\.gnome\.org/pub/gnome/", "http://ftp.gnome.org/pub/GNOME/", url)
-
- # apache urls
- sub("^http://apache.zone-h.org/", "http://www.apache.org/dist/", url)
-
- # gnu.org
- sub("^ftp://ftp\.gnu\.org/", "http://ftp.gnu.org/", url)
- sub("^http://ftp\.gnu\.org/pub/gnu/", "http://ftp.gnu.org/gnu/", url)
-
- # debian.org
- sub("^ftp://ftp\.[^.]+\.debian\.org/", "ftp://ftp.debian.org/", url)
- sub("^http://ftp\.[^.]+\.debian\.org/", "ftp://ftp.debian.org/", url)
- sub("^ftp://ftp\.debian\.org/pub/debian/", "ftp://ftp.debian.org/debian/", url)
-
- return url
-}
-
-function demacroize(str)
-{
- if (mod_name) {
- sub("%{mod_name}", mod_name, str);
- }
- if (pearname) {
- sub("%{_pearname}", pearname, str);
- }
- if (pearname) {
- sub("%{pearname}", pearname, str);
- }
- if (name) {
- sub("%{name}", name, str);
- }
- if (version) {
- sub("%{version}", version, str);
- }
- if (_beta) {
- sub("%{_beta}", _beta, str);
- }
- if (_rc) {
- sub("%{_rc}", _rc, str);
- }
- if (_pre) {
- sub("%{_pre}", _pre, str);
- }
- if (_snap) {
- sub("%{_snap}", _snap, str);
- }
- if (subver) {
- sub("%{subver}", subver, str);
- }
- return str;
-}
-
-function kill_preamble_macros()
-{
- if ($1 ~ /^Obsoletes:/) {
- # NB! assigning $2 a value breaks tabbing
- $2 = demacroize($2);
- }
- if ($1 ~ /^URL:/) {
- # NB! assigning $2 a value breaks tabbing
- $2 = demacroize($2);
- $2 = unify_url($2)
- }
-
- # fedora extras
- if (/%{\?FE_USERADD_REQ}/) {
- $0 = "";
- print "BuildRequires: rpmbuild(macros) >= 1.202"
- print "Provides: user(xxx)"
- print "Requires(postun): /usr/sbin/userdel"
- print "Requires(pre): /bin/id"
- print "Requires(pre): /usr/sbin/useradd"
- }
-}
-
-function get_epoch(pkg, ver, epoch)
-{
- return
-# should parse the BR lines more adequately:
-# freetype = 2.0.0 -> correct
-# freetype = 2.1.9 -> with epoch 1, as epoch 1 was added in 2.1.7
-
- shell = "grep -o '^" pkg ":[^:]\+' ../PLD-doc/BuildRequires.txt | awk '{print $NF}'";
- shell | getline epoch;
- return epoch;
-}
-
-function format_requires(tag, value, n, p, i, deps, ndeps) {
- # skip any formatting for commented out items or some weird macros
- if (/^#/ || /%\(/) {
- return tag "\t" value
- }
- n = split(value, p, / *,? */);
- for (i = 1; i <= n; i++) {
- if (p[i+1] ~ /[<=>]/) {
- # add epoch if the version doesn't have it but BuildRequires.txt has
- if (p[i] ~ /^[a-z]/ && p[i+2] !~ /^[0-9]+:/) {
- epoch = get_epoch(p[i], p[i+2])
- if (epoch) {
- p[i+2] = epoch ":" p[i+2];
- }
- }
- deps[ndeps++] = p[i] " " p[i+1] " " p[i+2];
- i += 2;
- } else {
- deps[ndeps++] = p[i];
- }
- }
- s = ""
- for (i in deps) {
- s = s sprintf("%s\t%s\n", tag, deps[i]);
- }
- return substr(s, 1, length(s)-1);
-}
-
-function use_tabs()
-{
- # reverse vim: ts=4 sw=4 et
- gsub(/ /, "\t");
-}
-
-function add_br(br)
-{
- BR[BR_count++] = br
-}
-
-# Load rpm macros
-# you should update the list also in adapter when making changes here
-function import_rpm_macros( v) {
- # File with rpm groups
- topdir = ENVIRON["_topdir"]
-
- if (!topdir) {
- print "adapter.awk should not not be invoked directly, but via adapter script" > "/dev/stderr"
- do_not_touch_anything = 1
- exit(rc = 1);
- }
-
- # update this version dep each time some new macro export is added
- v = 1.49
- if (!ENVIRON["ADAPTER_REVISION"] || ENVIRON["ADAPTER_REVISION"] < v) {
- printf("adapter shell script is outdated: Need %s, got %s. Please update it.\n", v, ENVIRON["ADAPTER_REVISION"]) > "/dev/stderr"
- do_not_touch_anything = 1
- exit(rc = 1);
- }
-
- prefix = ENVIRON["_prefix"]
- bindir = ENVIRON["_bindir"]
- sbindir = ENVIRON["_sbindir"]
- libdir = ENVIRON["_libdir"]
- sysconfdir = ENVIRON["_sysconfdir"]
- datadir = ENVIRON["_datadir"]
- includedir = ENVIRON["_includedir"]
- mandir = ENVIRON["_mandir"]
- infodir = ENVIRON["_infodir"]
- examplesdir = ENVIRON["_examplesdir"]
- docdir = ENVIRON["_defaultdocdir"]
- kdedocdir = ENVIRON["_kdedocdir"]
- gtkdocdir = ENVIRON["_gtkdocdir"]
- desktopdir = ENVIRON["_desktopdir"]
- pixmapsdir = ENVIRON["_pixmapsdir"]
- javadir = ENVIRON["_javadir"]
- pkgconfigdir = ENVIRON["_pkgconfigdir"]
- npkgconfigdir = ENVIRON["_npkgconfigdir"]
- localedir = ENVIRON["_localedir"]
-
- perl_sitearch = ENVIRON["perl_sitearch"]
- perl_archlib = ENVIRON["perl_archlib"]
- perl_privlib = ENVIRON["perl_privlib"]
- perl_vendorlib = ENVIRON["perl_vendorlib"]
- perl_vendorarch = ENVIRON["perl_vendorarch"]
- perl_sitelib = ENVIRON["perl_sitelib"]
-
- py_sitescriptdir = ENVIRON["py_sitescriptdir"]
- py_sitedir = ENVIRON["py_sitedir"]
- py_scriptdir = ENVIRON["py_scriptdir"]
- py_ver = ENVIRON["py_ver"]
-
- py3_sitescriptdir = ENVIRON["py3_sitescriptdir"]
- py3_sitedir = ENVIRON["py3_sitedir"]
- py3_scriptdir = ENVIRON["py3_scriptdir"]
- py3_ver = ENVIRON["py3_ver"]
-
- ruby_archdir = ENVIRON["ruby_archdir"]
- ruby_libdir = ENVIRON["ruby_libdir"]
- ruby_sitedir = ENVIRON["ruby_sitedir"]
- ruby_sitearchdir = ENVIRON["ruby_sitearchdir"]
- ruby_sitelibdir = ENVIRON["ruby_sitelibdir"]
- ruby_vendordir = ENVIRON["ruby_vendordir"]
- ruby_vendorarchdir = ENVIRON["ruby_vendorarchdir"]
- ruby_vendorlibdir = ENVIRON["ruby_vendorlibdir"]
- ruby_rubylibdir = ENVIRON["ruby_rubylibdir"] # deprecated
- ruby_rdocdir = ENVIRON["ruby_rdocdir"]
- ruby_ridir = ENVIRON["ruby_ridir"]
-
- php_pear_dir = ENVIRON["php_pear_dir"]
- php_data_dir = ENVIRON["php_data_dir"]
- tmpdir = ENVIRON["tmpdir"]
-
- systemdunitdir = ENVIRON["systemdunitdir"]
- systemdtmpfilesdir = ENVIRON["systemdtmpfilesdir"]
-}
-
-# php virtual deps as discussed in devel-en
-function replace_php_virtual_deps(field) {
- pkg = $2
-# if (pkg == "php-program") {
-# $0 = $1 "\t/usr/bin/php"
-# return
-# }
-
- if (field == "requires:") {
- if (pkg ~ /^php-(bcmath|bz2|calendar|ctype|curl|dba|date|dom|enchant|exif|fileinfo|filter|fpm|ftp|gd|gettext|gmp|hash|iconv|imap|interbase|intl|json|ldap|mbstring|mcrypt|mssql|mysql|mysqli|odbc|openssl|pcntl|pcre|pdo|pdo-dblib|pdo-firebird|pdo-mysql|pdo-odbc|pdo-pgsql|pdo-sqlite|pgsql|phar|posix|pspell|readline|recode|session|shmop|simplexml|snmp|soap|sockets|spl|sqlite|sqlite3|sybase-ct|sysvmsg|sysvsem|sysvshm|tidy|tokenizer|wddx|xml|xmlreader|xmlrpc|xmlwriter|xsl|zip|zlib)/) {
- sub(/^php-/, "php(", pkg);
- sub(/$/, ")", pkg);
- $2 = pkg
- }
- }
-
- if (pkg == "php" || pkg == "php-common") {
- $2 = "php(core)";
- if ($4 ~ /^[0-9]:/) {
- $4 = substr($4, 3);
- }
- }
-
- if (pkg == "php4") {
- $2 = "webserver(php)";
- if ($4 ~ /^[0-9]:/) {
- $4 = substr($4, 3);
- }
- }
-}
-
-# {{{ replace_groupnames(group)
-function replace_groupnames(group) {
- group = replace(group, "Amusements/Games", "Applications/Games");
- group = replace(group, "Amusements/Games/Strategy/Real Time", "X11/Applications/Games/Strategy");
- group = replace(group, "Application/Multimedia", "Applications/Multimedia");
- group = replace(group, "Application/System", "Applications/System");
- group = replace(group, "Applications/Compilers", "Development/Languages");
- group = replace(group, "Applications/Daemons", "Daemons");
- group = replace(group, "Applications/Internet", "Applications/Networking");
- group = replace(group, "Applications/Internet/Peer to Peer", "Applications/Networking");
- group = replace(group, "Applications/Productivity", "X11/Applications");
- group = replace(group, "Applications/Security", "Applications/System");
- group = replace(group, "Applications/Web", "Applications/WWW");
- group = replace(group, "Database", "Applications/Databases");
- group = replace(group, "Development/C", "Development/Libraries");
- group = replace(group, "Development/Code Generators", "Development");
- group = replace(group, "Development/Docs", "Documentation");
- group = replace(group, "Development/Documentation", "Documentation");
- group = replace(group, "Development/Java", "Development/Languages/Java");
- group = replace(group, "Development/Languages/C and C++", "Libraries");
- group = replace(group, "Development/Languages/Other", "Development/Languages");;
- group = replace(group, "Development/Languages/Ruby", "Development/Languages");
- group = replace(group, "Development/Libraries/C and C++", "Development/Libraries");
- group = replace(group, "Development/Libraries/Java", "Development/Languages/Java");
- group = replace(group, "Development/Libraries/Python", "Development/Languages/Python");
- group = replace(group, "Development/Libraries/TCL", "Development/Languages/Tcl");;
- group = replace(group, "Development/Other", "Development");
- group = replace(group, "Development/Python", "Development/Languages/Python");
- group = replace(group, "Development/Testing", "Development");
- group = replace(group, "Editors", "Applications/Text");
- group = replace(group, "Emulators", "Applications/Emulators");
- group = replace(group, "File tools", "Applications/File");
- group = replace(group, "Games", "Applications/Games");
- group = replace(group, "Library/Development", "Development/Libraries");
- group = replace(group, "Networking/Deamons", "Networking/Daemons");
- group = replace(group, "Networking/Mail", "Applications/Mail");
- group = replace(group, "Networking/Other", "Networking");
- group = replace(group, "Productivity/Databases/Servers", "Applications/Databases");
- group = replace(group, "Productivity/Multimedia/Other", "X11/Applications/Multimedia");
- group = replace(group, "Productivity/Networking/Web/Servers", "Networking/Daemons/HTTP");;
- group = replace(group, "Python/Libraries", "Libraries/Python");
- group = replace(group, "Shells", "Applications/Shells");
- group = replace(group, "System Environment/Base", "Base");
- group = replace(group, "System Environment/Daemons", "Daemons");
- group = replace(group, "System Environment/Kernel", "Base/Kernel");
- group = replace(group, "System Environment/Libraries", "Libraries");
- group = replace(group, "System Tools", "Applications/System");
- group = replace(group, "System", "Base");
- group = replace(group, "System/Base", "Base");
- group = replace(group, "System/Kernel and hardware", "Base/Kernel");
- group = replace(group, "System/Libraries", "Libraries");
- group = replace(group, "System/Servers", "Daemons");
- group = replace(group, "Text Processing/Markup/HTML", "Applications/Text");
- group = replace(group, "Text Processing/Markup/XML", "Applications/Text");
- group = replace(group, "Text tools", "Applications/Text");
- group = replace(group, "User Interface/Desktops", "X11/Applications");
- group = replace(group, "User Interface/X", "X11/Applications");
- group = replace(group, "Utilities/System", "Applications/System");
- group = replace(group, "Web/Database", "Applications/WWW");
- group = replace(group, "X11/GNOME", "X11/Applications");
- group = replace(group, "X11/GNOME/Applications", "X11/Applications");
- group = replace(group, "X11/GNOME/Development/Libraries", "X11/Development/Libraries");
- group = replace(group, "X11/Games", "X11/Applications/Games");
- group = replace(group, "X11/Games/Strategy", "X11/Applications/Games/Strategy");
- group = replace(group, "X11/Library", "X11/Libraries");
- group = replace(group, "X11/Utilities", "X11/Applications");
- group = replace(group, "X11/XFree86", "X11");
- group = replace(group, "X11/Xserver", "X11/Servers");
-
- return group;
-}
-# }}}
-
-# {{{ replace_pkgconfig(pkg)
-function replace_pkgconfig(pkg, cmd, path, n, i, line) {
- n = split("/usr/lib64/pkgconfig /usr/lib/pkgconfig /usr/share/pkgconfig", path, / /);
- for (i = 1; i <= n; i++) {
- cmd = "rpm -qf --qf '%{N}' " path[i] "/" pkg ".pc";
- # Getline returns 0 on end-of-file, -1 on error, otherwise 1.
- if ((cmd | getline line) <= 0) {
- continue;
- }
-
- if (line !~ /No such file or directory/) {
- # @modifies global $2
- $2 = line;
- return
- }
- }
-}
-# }}}
-
-# {{{ replace_pythonegg(pkg)
-function replace_pythonegg(pkg, cmd, line) {
- cmd = "rpm -q --qf '%{N}' --whatprovides 'pythonegg(" pkg ")'";
- # Getline returns 0 on end-of-file, -1 on error, otherwise 1.
- if ((cmd | getline line) <= 0) {
- return;
- }
-
- if (line !~ /no package provides/) {
- # @modifies global $2
- $2 = line;
- return;
- }
-}
-# }}}
-
-function replace_requires(field, pkg) {
- # pkg-config -> package names
- if (match($2, /pkgconfig\(([^)]+)\)/)) {
- pkg = substr($2, RSTART + 10, RLENGTH - 11);
- replace_pkgconfig(pkg);
- }
-
- # pythonegg -> package names
- if (match($2, /pythonegg\(([^)]+)\)/)) {
- pkg = substr($2, RSTART + 10, RLENGTH - 11);
- replace_pythonegg(pkg);
- }
-
- sub(/^python-setuptools-devel$/, "python-distribute", $2);
- sub(/^gcc-g77/, "gcc-fortran", $2);
-
- # use virtual, not package name
- sub(/^rpm-build-macros$/, "rpmbuild(macros)", $2);
-
- # bad package.xml, see http://pear.php.net/bugs/bug.php?id=17779
- sub(/^php-php-gtk/, "php-gtk2", $2);
-
- # {{{ jpackages / fedora java packages
- sub(/^antlr3$/, "java-antlr3", $2);
- sub(/^aqute-bnd$/, "java-bnd", $2);
- sub(/^avalon-framework$/, "java-avalon-framework", $2);
- sub(/^avalon-logkit$/, "java-avalon-logkit", $2);
- sub(/^axis$/, "java-axis", $2);
- sub(/^bouncycastle$/, "java-bcprov", $2);
- sub(/^bouncycastle-mail$/, "java-bcmail", $2);
- sub(/^bouncycastle-pg$/, "java-bcpg", $2);
- sub(/^bouncycastle-tsp$/, "java-bctsp", $2);
- sub(/^bsf$/, "java-bsf", $2);
- sub(/^dom4j$/, "java-dom4j", $2);
- sub(/^flute$/, "java-flute", $2);
- sub(/^gnu-regexp$/, "java-gnu-regexp", $2);
- sub(/^gnu.regexp$/, "java-gnu-regexp", $2);
- sub(/^hamcrest$/, "java-hamcrest", $2);
- sub(/^itext$/, "java-itext", $2);
- sub(/^jaas$/, "java(jaas)", $2);
- sub(/^jaf$/, "java(jaf)", $2);
- sub(/^jakarta-ant$/, "ant", $2);
- sub(/^jakarta-commons-codec$/, "java-commons-codec", $2);
- sub(/^jakarta-commons-httpclient$/, "java-commons-httpclient", $2);
- sub(/^jakarta-commons-logging$/, "java-commons-logging", $2);
- sub(/^jakarta-log4j$/, "java-log4j", $2);
- sub(/^jakarta-oro$/, "java-oro", $2);
- sub(/^jakarta-servletapi$/, "java(servlet)", $2);
- sub(/^java-devel$/, "jdk", $2);
- sub(/^java\(JSP\)$/, "java(jsp)", $2);
- sub(/^java\(JavaServerFaces\)$/, "java(javaserverfaces)", $2);
- sub(/^java\(Portlet\)$/, "java(portlet)", $2);
- sub(/^java\(Servlet\)$/, "java(servlet)", $2);
- sub(/^javamail$/, "java(javamail)", $2);
- sub(/^jaxp$/, "java(jaxp)", $2);
- sub(/^jaxp_parser_impl$/, "java(jaxp_parser_impl)", $2);
- sub(/^jaxp_transform_impl$/, "java(jaxp_transform_impl)", $2);
- sub(/^jce$/, "java(jce)", $2);
- sub(/^jcommon$/, "java-jcommon", $2);
- sub(/^jdbc-stdext$/, "java(jdbc-stdext)", $2);
- sub(/^jdepend$/, "java-jdepend", $2);
- sub(/^jfreechart$/, "java-jfreechart", $2);
- sub(/^jmx$/, "java(jmx)", $2);
- sub(/^jndi$/, "java(jndi)", $2);
- sub(/^jsch$/, "java-jsch", $2);
- sub(/^jsse$/, "java(jsse)", $2);
- sub(/^jta$/, "java(jta)", $2);
- sub(/^junit$/, "java-junit", $2);
- sub(/^junit4$/, "java-junit", $2);
- sub(/^ldapjdk$/, "ldapsdk", $2);
- sub(/^libbase$/, "java-libbase", $2);
- sub(/^libfonts$/, "java-libfonts", $2);
- sub(/^libformula$/, "java-libformula", $2);
- sub(/^liblayout$/, "java-liblayout", $2);
- sub(/^libloader$/, "java-libloader", $2);
- sub(/^librepository$/, "java-librepository", $2);
- sub(/^libserializer$/, "java-libserializer", $2);
- sub(/^log4j$/, "java-log4j", $2);
- sub(/^logging-log4j$/, "java-log4j", $2);
- sub(/^oro$/, "java-oro", $2);
- sub(/^pdf-renderer$/, "java-pdf-renderer", $2);
- sub(/^pentaho-libxml$/, "java-libxml", $2);
- sub(/^rhino$/, "java-rhino", $2);
- sub(/^sac$/, "java-sac", $2);
- sub(/^saxon-scripts$/, "saxon", $2);
- sub(/^servlet$/, "java(servlet)", $2);
- sub(/^uddi4j$/, "java-uddi4j", $2);
- sub(/^ws-jaxme$/, "java-jaxme", $2);
- sub(/^wsdl4j$/, "java-wsdl4j", $2);
- sub(/^xalan-j$/, "java-xalan", $2);
- sub(/^xalan-j2$/, "java-xalan", $2);
- sub(/^xerces-j$/, "java-xerces", $2);
- sub(/^xerces-j2$/, "java-xerces", $2);
- sub(/^xml-commons-apis$/, "java-xml-commons", $2);
- sub(/^xml-commons-resolver$/, "java-xml-commons-resolver", $2);
- sub(/^xmldb-api$/, "java-xmldb", $2);
- sub(/^xmldb-api-sdk$/, "java-xmldb-sdk", $2);
- # }}}
-
- # {{{ fedora / redhat
- sub(/^Django$/, "python-django", $2);
- sub(/^GitPython$/, "python-git", $2);
- sub(/^MySQL-python$/, "python-MySQLdb", $2);
- sub(/^NetworkManager-glib-devel$/, "NetworkManager-devel", $2);
- sub(/^PyQt4-devel$/, "python-PyQt4-devel", $2);
- sub(/^PyQwt-devel$/, "python-PyQwt-devel", $2);
- sub(/^PyYAML$/, "python-PyYAML", $2);
- sub(/^ccid$/, "pcsc-driver-ccid", $2);
- sub(/^chkconfig$/, "/sbin/chkconfig", $2);
- sub(/^db4-devel$/, "db-devel", $2);
- sub(/^dbus-python$/, "python-dbus", $2);
- sub(/^desktop-notification-daemon$/, "dbus(org.freedesktop.Notifications)", $2);
- sub(/^device-mapper-multipath$/, "multipath-tools", $2);
- sub(/^django-tagging$/, "python-django_tagging", $2);
- sub(/^elfutils-libelf-devel$/, "elfutils-devel", $2);
- sub(/^file-devel$/, "libmagic-devel", $2);
- sub(/^freetype2-devel$/, "freetype-devel", $2);
- sub(/^fuse-devel$/, "libfuse-devel", $2);
- sub(/^gamin-python$/, "python-gamin", $2);
- sub(/^gcc-c\+\+$/, "libstdc++-devel", $2);
- sub(/^gnome-desktop3-devel$/, "gnome-desktop-devel", $2);
- sub(/^gnome-python2-extras$/, "python-gnome-extras", $2);
- sub(/^gnome-python2-gconf$/, "python-gnome-gconf", $2);
- sub(/^gnome-python2-gnomekeyring$/, "python-gnome-desktop-keyring", $2);
- sub(/^gnome-python2-gtkspell$/, "python-gnome-extras-gtkspell", $2);
- sub(/^gtk-sharp2-devel$/, "dotnet-gtk-sharp2-devel", $2);
- sub(/^gtk2$/, "gtk+2", $2);
- sub(/^gtk2-devel$/, "gtk+2-devel", $2);
- sub(/^gtk3$/, "gtk+3", $2);
- sub(/^gtk3-devel$/, "gtk+3-devel", $2);
- sub(/^initscripts$/, "rc-scripts", $2);
- sub(/^iproute$/, "iproute2", $2);
- sub(/^iscsi-initiator-utils$/, "open-iscsi", $2);
- sub(/^keyutils-libs-devel$/, "keyutils-devel", $2);
- sub(/^libSM-devel$/, "xorg-lib-libSM-devel", $2);
- sub(/^libX11-devel$/, "xorg-lib-libX11-devel", $2);
- sub(/^libXScrnSaver-devel$/, "xorg-lib-libXScrnSaver-devel", $2);
- sub(/^libXau-devel$/, "xorg-lib-libXau-devel", $2);
- sub(/^libXcomposite-devel$/, "xorg-lib-libXcomposite-devel", $2);
- sub(/^libXcursor-devel$/, "xorg-lib-libXcursor-devel", $2);
- sub(/^libXdamage-devel$/, "xorg-lib-libXdamage-devel", $2);
- sub(/^libXext-devel$/, "xorg-lib-libXext-devel", $2);
- sub(/^libXft-devel$/, "xorg-lib-libXft-devel", $2);
- sub(/^libXinerama-devel$/, "xorg-lib-libXinerama-devel", $2);
- sub(/^libXrandr-devel$/, "xorg-lib-libXrandr-devel", $2);
- sub(/^libXrender-devel$/, "xorg-lib-libXrender-devel", $2);
- sub(/^libXt-devel$/, "xorg-lib-libXt-devel", $2);
- sub(/^libXtst-devel$/, "xorg-lib-libXtst-devel", $2);
- sub(/^libXv-devel$/, "xorg-lib-libXv-devel", $2);
- sub(/^libXxf86misc-devel$/, "xorg-lib-libXxf86misc-devel", $2);
- sub(/^libXxf86vm-devel$/, "xorg-lib-libXxf86vm-devel", $2);
- sub(/^libacl-devel$/, "acl-devel", $2);
- sub(/^libcurl-devel$/, "curl-devel", $2);
- sub(/^libgudev1-devel$/, "udev-glib-devel", $2);
- sub(/^libmx-devel$/, "mx-devel", $2);
- sub(/^libselinux-python$/, "python-selinux", $2);
- sub(/^libsrtp-devel$/, "srtp-devel", $2);
- sub(/^libtdb$/, "tdb", $2);
- sub(/^libtdb-devel$/, "tdb-devel", $2);
- sub(/^libtevent$/, "tevent", $2);
- sub(/^libtevent-devel$/, "tevent-devel", $2);
- sub(/^libusb1-devel$/, "libusb-devel", $2);
- sub(/^libuser-python$/, "python-libuser", $2);
- sub(/^libxkbfile-devel$/, "xorg-lib-libxkbfile", $2);
- sub(/^mod_wsgi$/, "apache-mod_wsgi", $2);
- sub(/^newt-python$/, "python-snack", $2);
- sub(/^notify-python$/, "python-pynotify", $2);
- sub(/^pcsc-lite-ccid$/, "pcsc-driver-ccid", $2);
- sub(/^pulseaudio-libs-devel$/, "pulseaudio-devel", $2);
- sub(/^pyOpenSSL$/, "python-pyOpenSSL", $2);
- sub(/^pycairo$/, "python-pycairo", $2);
- sub(/^pyflakes$/, "python-pyflakes", $2);
- sub(/^pygobject2$/, "python-pygobject", $2);
- sub(/^pygobject3$/, "python-pygobject3", $2);
- sub(/^pygobject3-devel$/, "python-pygobject3-common-devel", $2);
- sub(/^pygtk2$/, "python-pygtk", $2);
- sub(/^pygtk2-devel$/, "python-pygtk-devel", $2);
- sub(/^pygtk2-libglade$/, "python-pygtk-glade", $2);
- sub(/^pykickstart$/, "python-pykickstart", $2);
- sub(/^pyparsing$/, "python-pyparsing", $2);
- sub(/^pyparted$/, "python-parted", $2);
- sub(/^pysvn$/, "python-pysvn", $2);
- sub(/^pytalloc$/, "python-talloc", $2);
- sub(/^pytalloc-devel$/, "python-talloc-devel", $2);
- sub(/^pytest$/, "python-pytest", $2);
- sub(/^python-cups$/, "python-pycups", $2);
- sub(/^python-enchant$/, "python-pyenchant", $2);
- sub(/^python-imaging$/, "python-PIL", $2);
- sub(/^python-imaging-tk$/, "python-PIL-tk", $2);
- sub(/^python-newt$/, "python-snack", $2);
- sub(/^python-pygtk$/, "python-pygtk-gtk", $2);
- sub(/^python-recaptcha-client$/, "python-recaptcha", $2);
- sub(/^python-twisted-core$/, "python-TwistedCore", $2);
- sub(/^python-twisted-core$/, "python-TwistedCore", $2);
- sub(/^python-twisted-names$/, "python-TwistedNames", $2);
- sub(/^python2-devel$/, "python-devel", $2);
- sub(/^pytz$/, "python-pytz", $2);
- sub(/^pyxdg$/, "python-pyxdg", $2);
- sub(/^qt4-devel$/, "qt4-build", $2);
- sub(/^qt4-webkit-devel$/, "QtWebKit-devel", $2);
- sub(/^qtlockedfile-devel$/, "QtLockedFile-devel", $2);
- sub(/^qtsingleapplication-devel$/, "QtSingleApplication-devel", $2);
- sub(/^rpm-python$/, "python-rpm", $2);
- sub(/^sip-devel$/, "python-sip-devel", $2);
- sub(/^tftp-server$/, "tftpdaemon", $2);
- sub(/^tkinter$/, "python-tkinter", $2);
- sub(/^urw-fonts$/, "fonts-Type1-urw", $2);
- sub(/^webkitgtk3-devel$/, "gtk-webkit3-devel", $2);
- sub(/^xapian-bindings-python$/, "python-xapian", $2);
- sub(/^xorg-x11-server-sdk$/, "xorg-xserver-server-devel", $2);
- # }}}
-
- # {{{ mandriva
- sub(/^python-gobject-devel$/, "python-pygobject-devel", $2);
- sub(/^python-pyrex$/, "python-Pyrex", $2);
- sub(/^webkitgtk-devel$/, "gtk-webkit-devel", $2);
- sub(/^python-curl$/, "python-pycurl", $2);
- sub(/^python-webkitgtk$/, "python-pywebkitgtk", $2);
- sub(/^pygtk2.0$/, "python-pygtk-gtk", $2);
- sub(/^gnome-python-gconf$/, "python-gnome-gconf", $2);
- # }}}
-
- # {{{ debian / ubuntu
- sub(/^blkid-dev$/, "libblkid-devel", $2);
- sub(/^ext2fs-dev$/, "e2fsprogs-devel", $2);
- sub(/^libao-dev$/, "libao-devel", $2);
- sub(/^libboost-filesystem[0-9.]+-dev$/, "boost-devel", $2);
- sub(/^libboost-program-options[0-9.]+-dev$/, "boost-devel", $2);
- sub(/^libboost-regex[0-9.]+-dev$/, "boost-devel", $2);
- sub(/^libboost-thread[0-9.]+-dev$/, "boost-devel", $2);
- sub(/^libcurl4-openssl-dev$/, "curl-devel", $2);
- sub(/^libdnet-dev$/, "libdnet-devel", $2);
- sub(/^libesd0-dev$/, "esound-devel", $2);
- sub(/^libfishsound1-dev$/, "libfishsound-devel", $2);
- sub(/^libgconf2-dev$/, "GConf2-devel", $2);
- sub(/^libgl1-mesa-dev$/, "OpenGL-devel", $2);
- sub(/^libgl1-mesa-dri$/, "OpenGL", $2);
- sub(/^libglib2.0-dev$/, "glib2-devel", $2);
- sub(/^libglu1-mesa-dev$/, "OpenGL-GLU-devel", $2);
- sub(/^libgtk2.0-dev$/, "gtk+2-devel", $2);
- sub(/^libhunspell-dev$/, "hunspell-devel", $2);
- sub(/^libmcrypt-dev$/, "libmcrypt-devel", $2);
- sub(/^libmhash-dev$/, "mhash-devel", $2);
- sub(/^liboggz1-dev$/, "libggz-devel", $2);
- sub(/^libpango1.0-dev$/, "pango-devel", $2);
- sub(/^libqt4-dev$/, "qt4-build", $2);
- sub(/^libshout3-dev$/, "libshout-devel", $2);
- sub(/^libslp-dev$/, "openslp-devel", $2);
- sub(/^libsndfile1-dev$/, "libsndfile-devel", $2);
- sub(/^libspeex-dev$/, "speex-devel", $2);
- sub(/^libssl-dev$/, "openssl-devel", $2);
- sub(/^libvorbis-dev$/, "libvorbis-devel", $2);
- sub(/^libxslt1-dev$/, "libxslt-devel", $2);
- sub(/^libxss-dev$/, "xorg-lib-libXScrnSaver-devel", $2);
- sub(/^mesa-common-dev$/, "OpenGL-devel", $2);
- sub(/^libudev$/, "udev-libs", $2);
- sub(/^tcp_wrappers-devel$/, "libwrap-devel", $2);
- sub(/^vala-tools$/, "vala", $2);
- sub(/^vala-devel$/, "vala", $2);
- # }}}
-
- # {{{ altlinux
- sub(/^libatk-devel$/, "atk-devel", $2);
- sub(/^libgit-devel$/, "git-core-devel", $2);
- sub(/^libgtk\+2-devel$/, "gtk+2-devel", $2);
- sub(/^libncurses-devel$/, "ncurses-devel", $2);
- sub(/^libncursesxx-devel$/, "ncurses-c++-devel", $2);
- sub(/^libpango-devel$/, "pango-devel", $2);
- sub(/^libpcre-devel$/, "pcre-devel", $2);
- sub(/^libpopt-devel$/, "popt-devel", $2);
- sub(/^libssl-devel$/, "openssl-devel", $2);
- # }}}
-
- # {{{ suse/opensuse
- sub(/^alsa-devel$/, "alsa-lib-devel", $2);
- sub(/^gtk-sharp2$/, "dotnet-gtk-sharp2", $2);
- sub(/^gtkmm2-devel$/, "gtkmm-devel", $2);
- sub(/^libexpat-devel$/, "expat-devel", $2);
- sub(/^libffmpeg-devel$/, "ffmpeg-devel", $2);
- sub(/^libopenssl-devel$/, "openssl-devel", $2);
- sub(/^libpulse-devel$/, "pulseaudio-devel", $2);
- sub(/^monodoc-core$/, "mono-monodoc", $2);
- sub(/^python-cairo$/, "python-pycairo", $2);
- sub(/^python-gobject$/, "python-pygobject", $2);
- sub(/^python-gstreamer-0_10$/, "python-gstreamer", $2);
- sub(/^python-gtk$/, "python-pygtk-gtk", $2);
- sub(/^python-xdg$/, "python-pyxdg", $2);
- # }}}
-
- replace_php_virtual_deps(field)
-}
-
-# vim:ts=4:sw=4 fdm=marker
PROGRAM=${0##*/}
APPDIR=$(d=$0; [ -L "$d" ] && d=$(readlink -f "$d"); dirname "$d")
-RCSID='$Id: builder,v 1.645 2011/02/13 17:54:10 glen Exp $' r=${RCSID#* * } rev=${r%% *}
-VERSION="v0.35/$rev"
+VERSION="v0.35"
VERSIONSTRING="\
Build package utility from PLD Linux Packages repository
-$VERSION (C) 1999-2013 Free Penguins".
+$VERSION (C) 1999-2016 Free Penguins".
CLEAN_PATH="/bin:/usr/bin:/usr/sbin:/sbin:/usr/X11R6/bin"
# target arch, can also be used for log file naming
TARGET=$(rpm -E %{_target})
+# Note the *single* quotes, this allows using shell variables expanded at build time
# Example: LOGFILE='../log.$PACKAGE_NAME'
# Example: LOGFILE='../LOGS/log.$PACKAGE_NAME.$DATE'
# Example: LOGFILE='$PACKAGE_NAME/$PACKAGE_NAME.$DATE.log'
# Example: LOGFILE='$PACKAGE_NAME.$DATE.log'
-# Yes, you can use variable name! Note _single_ quotes!
+# Example: LOGFILE='.log.$PACKAGE_NAME-$PACKAGE_VERSION-$PACKAGE_RELEASE.$TARGET.$DATE'
LOGFILE=''
# use teeboth Perl wrapper
PACKAGE_NAME=""
ASSUMED_NAME=""
PROTOCOL="http"
+IPOPT=""
# use lftp by default when available
-USE_LFTP=
-lftp --version > /dev/null 2>&1 && USE_LFTP=yes
+test -z "${USE_LFTP+x}" && lftp --version > /dev/null 2>&1 && USE_LFTP=yes
PARALLEL_DOWNLOADS=10
WGET_RETRIES=${MAX_WGET_RETRIES:-0}
#GROUP_BCONDS="yes"
#LOGFILE='../LOGS/log.$PACKAGE_NAME.$DATE'
#TITLECHANGE=no
-#
-SU_SUDO=""
+
+SU_SUDO="sudo"
+
if [ -n "$HOME_ETC" ]; then
USER_CFG="$HOME_ETC/.builderrc"
BUILDER_MACROS="$HOME_ETC/.builder-rpmmacros"
fi
if [ -n "$USE_PROZILLA" ]; then
- GETURI="proz --no-getch -r -P ./ -t$WGET_RETRIES $PROZILLA_OPTS"
- GETURI2="$GETURI"
- OUTFILEOPT="-O"
+ GETURI=download_proz
elif [ -n "$USE_AXEL" ]; then
- GETURI="axel -a $AXEL_OPTS"
- GETURI2="$GETURI"
- OUTFILEOPT="-o"
+ GETURI=download_axel
elif [ -n "$USE_LFTP" ]; then
GETURI=download_lftp
- GETURI2=$GETURI
- OUTFILEOPT=""
else
- wget --help 2>&1 | grep -q -- ' --no-check-certificate ' && WGET_OPTS="$WGET_OPTS --no-check-certificate"
- wget --help 2>&1 | grep -q -- ' --inet ' && WGET_OPTS="$WGET_OPTS --inet"
- wget --help 2>&1 | grep -q -- ' --retry-connrefused ' && WGET_OPTS="$WGET_OPTS --retry-connrefused"
- WGET_OPTS="$WGET_OPTS --user-agent=$USER_AGENT"
-
- GETURI="wget --passive-ftp -c -nd -t$WGET_RETRIES $WGET_OPTS"
- GETURI2="wget -c -nd -t$WGET_RETRIES $WGET_OPTS"
- OUTFILEOPT="-O"
+ GETURI=download_wget
fi
-GETLOCAL="cp -a"
+GETLOCAL=${GETLOCAL:-cp -a}
-if rpm --version 2>&1 | grep -q '4.0.[0-2]'; then
- RPM="rpm"
- RPMBUILD="rpm"
-else
- RPM="rpm"
- RPMBUILD="rpmbuild"
-fi
+RPM="rpm"
+RPMBUILD="rpmbuild"
#
# sanity checks
fi
POLDEK_INDEX_DIR="$($RPM --eval %_rpmdir)/"
-POLDEK_CMD="$SU_SUDO /usr/bin/poldek --noask"
+POLDEK_CMD="$SU_SUDO /usr/bin/poldek"
# TODO: add teeboth
+# TODO: what this function does?
run_poldek() {
RES_FILE=$(tempfile)
if [ -n "$LOGFILE" ]; then
if [ -n "$LASTLOG_FILE" ]; then
echo "LASTLOG=$LOG" > $LASTLOG_FILE
fi
- (${NICE_COMMAND} ${POLDEK_CMD} `while test $# -gt 0; do echo "$1 ";shift;done` ; echo $? > ${RES_FILE})|tee -a $LOG
+ (${NICE_COMMAND} ${POLDEK_CMD} --noask `while test $# -gt 0; do echo "$1 ";shift;done` ; echo $? > ${RES_FILE})|tee -a $LOG
# FIXME $exit_pldk undefined
return $exit_pldk
else
- (${NICE_COMMAND} ${POLDEK_CMD} `while test $# -gt 0; do echo "$1 ";shift;done` ; echo $? > ${RES_FILE}) 1>&2 >/dev/null
+ (${NICE_COMMAND} ${POLDEK_CMD} --noask `while test $# -gt 0; do echo "$1 ";shift;done` ; echo $? > ${RES_FILE}) 1>&2 >/dev/null
return `cat ${RES_FILE}`
rm -rf ${RES_FILE}
fi
#---------------------------------------------
# functions
+download_prozilla() {
+ local outfile=$1 url=$2 retval
+
+ proz --no-getch -r -P ./ -t$WGET_RETRIES $PROZILLA_OPTS -O "$outfile" "$url"
+ retval=$?
+
+ return $retval
+}
+
+download_axel() {
+ local outfile=$1 url=$2 retval
+
+ axel -a $AXEL_OPTS -o "$outfile" "$url"
+ retval=$?
+
+ return $retval
+}
+
+download_wget() {
+ local outfile=$1 url=$2 retval wget_help
+ if [ -z "${WGET_OPTS_SET+x}" ]; then
+ wget_help="$(wget --help 2>&1)"
+ echo "$wget_help" | grep -q -- ' --no-check-certificate ' && WGET_OPTS="$WGET_OPTS --no-check-certificate"
+ echo "$wget_help" | grep -q -- ' --inet ' && WGET_OPTS="$WGET_OPTS --inet"
+ echo "$wget_help" | grep -q -- ' --retry-connrefused ' && WGET_OPTS="$WGET_OPTS --retry-connrefused"
+ echo "$wget_help" | grep -q -- ' --no-iri ' && WGET_OPTS="$WGET_OPTS --no-iri"
+ WGET_OPTS="-c -nd -t$WGET_RETRIES $WGET_OPTS --user-agent=$USER_AGENT $IPOPT --passive-ftp"
+ WGET_OPTS_SET=1
+ fi
+
+ wget $WGET_OPTS -O "$outfile" "$url"
+ retval=$?
+ if [ $retval -ne 0 ]; then
+ if [ "`echo $url | grep -E 'ftp://'`" ]; then
+ ${GETURI} -O "$outfile" "$url"
+ retval=$?
+ fi
+ fi
+ return $retval
+}
+
download_lftp() {
local outfile=$1 url=$2 retval tmpfile
- # TODO: use mktemp
- tmpfile=$outfile.tmp
+ tmpfile=$(tempfile) || exit 1
lftp -c "
$([ "$DEBUG" = "yes" ] && echo "debug 5;")
+ $([ "$IPOPT" = "-4" ] && echo "set dns:order \"inet\";")
+ $([ "$IPOPT" = "-6" ] && echo "set dns:order \"inet6\";")
set ssl:verify-certificate no;
set net:max-retries $WGET_RETRIES;
set http:user-agent \"$USER_AGENT\";
constructions. Set GROUP_BCONDS to yes to make use of it.
--target <platform>, --target=<platform>
- build for platform <platform>.
---init-rpm-dir - initialize ~/rpm directory structure
+--init-rpm-dir, --init
+ - initialize ~/rpm directory structure
--git-pld - force use of PLD git and distfiles
--git-tld - force use of TLD git and distfiles (note: it will fall
back to PLD git/df if package doesn't exist in TLD git)
# create tempfile. as secure as possible
tempfile() {
- mktemp --tmpdir -t builder.$PACKAGE_NAME.XXXXXX || ${TMPDIR:-/tmp}/builder.$RANDOM.$$
+ local prefix=builder.$PACKAGE_NAME${1:+.$1}
+ mktemp --tmpdir -t $prefix.XXXXXX || echo ${TMPDIR:-/tmp}/$prefix.$RANDOM.$$
}
tempdir() {
- mktemp --tmpdir -d builder.$PACKAGE_NAME.XXXXXX
+ local prefix=builder.$PACKAGE_NAME${1:+.$1}
+ mktemp --tmpdir -d $prefix.XXXXXX
}
# inserts git log instead of %changelog
-# outputs name of modified file created by tempfile
+# @output directory containing modified specfile
insert_gitlog() {
local SPECFILE=$1 specdir=$(tempdir) gitlog=$(tempfile) speclog=$(tempfile)
done > $gitlog
# add link to full git logs
- local giturl="http://git.tld-linux.org/?p=packages/$PACKAGE_NAME.git;a=log"
+ local giturl="http://git.tld-linux.org/?p=packages/${SPECFILE%.spec}.git;a=log"
if [ -n "$CVSTAG" ]; then
giturl="$giturl;h=$CVSTAG"
fi
# common changes:
# - perl(Package::Name) -> perl-Package-Name
depspecname() {
- local package="$1"
+ local DEPS
+
+ if [ $# -gt 0 ]; then
+ DEPS="$@"
+ else
+ DEPS=$(cat)
+ fi
+
+ echo "$DEPS" | tr ' ' '\n' | sed -re '
+ # perl virtual deps
+ /perl\(.*\)/{
+ s/perl\((.*)\)/perl-\1/
+ s/::/-/g
+ }
- package=$(echo "$package" | sed -e '/perl(.*)/{s,perl(\(.*\)),perl-\1,;s,::,-,g};' -e 's/-\(devel\|static\)$//' )
- echo "$package"
+ s/apache\(EAPI\)-devel/apache-devel/
+
+ s/db-devel/db5.3-devel/
+ s/libjpeg-devel/libjpeg-turbo-devel/
+ '
}
update_shell_title() {
- [ -t 1 ] || return
+ [ -t 2 ] || return
local len=${COLUMNS:-80}
local msg="$(echo "$*" | cut -c-$len)"
# runs rpm with minimal macroset
minirpm() {
- # we reset macros not to contain macros.build as all the %() macros are
- # executed here, while none of them are actually needed.
- # at the time of this writing macros.build + macros contained 70 "%(...)" macros.
- safe_macrofiles=$(rpm $TARGET_SWITCH --showrc | awk -F: '/^macrofiles/ { gsub(/^macrofiles[ \t]+:/, "", $0); gsub(/:.*macros.build:/, ":", $0); print $0 } ')
-
# TODO: move these to /usr/lib/rpm/macros
cat > $BUILDER_MACROS <<'EOF'
%x8664 x86_64 amd64 ia32e
%remove_etc_shells(p) %{p:<lua>}
%lua_add_etc_shells() %{nil}
%lua_remove_etc_shells() %{nil}
-%required_jdk %{nil}
+%required_jdk jdk
%buildrequires_jdk %{nil}
%pear_package_print_optionalpackages %{nil}
EOF
%_sourcedir ./
EOF
fi
- eval PATH=$CLEAN_PATH $RPMBUILD $TARGET_SWITCH --macros "$safe_macrofiles:$BUILDER_MACROS" $QUIET $RPMOPTS $RPMBUILDOPTS $BCOND $* 2>&1
+ if rpm --version 2>&1 | grep -qE '5\.[0-9]+\.[0-9]+'; then
+ safe_macrofiles=$(rpm $TARGET_SWITCH --showrc | awk -F: '/^macrofiles/ { gsub(/^macrofiles[ \t]+:/, "", $0); print $0 } ')
+ eval PATH=$CLEAN_PATH $RPMBUILD $TARGET_SWITCH --macros "$safe_macrofiles:$BUILDER_MACROS" $QUIET $RPMOPTS $RPMBUILDOPTS $BCOND $* 2>&1
+ else
+ eval PATH=$CLEAN_PATH $RPMBUILD $TARGET_SWITCH --load "$BUILDER_MACROS" $QUIET $RPMOPTS $RPMBUILDOPTS $BCOND $* 2>&1
+ fi
}
cache_rpm_dump() {
update_shell_title "parse_spec: OK!"
}
+# aborts program abnormally
+die() {
+ local rc=${2:-1}
+ echo >&2 "$PROGRAM: ERROR: $*"
+ exit $rc
+}
+
Exit_error() {
if [ -n "$DEBUG" ]; then
set -x
exit 2 ;;
"err_no_spec_in_repo" )
remove_build_requires
- echo >&2 "Error: spec file not stored in PLD repo."
+ echo >&2 "Error: spec file not stored in repository."
+ if [ -n "$2" ]; then
+ echo >&2 "Tried: $2"
+ fi
+
exit 3 ;;
"err_no_source_in_repo" )
remove_build_requires
PACKAGE_DIR=$REPO_DIR/$ASSUMED_NAME
fi
else
- REPO_DIR="."
- PACKAGE_DIR="."
+ TOP_DIR=$(pwd)
+ PACKAGE_DIR=$TOP_DIR
+ REPO_DIR=$PACKAGE_DIR
+ RPMBUILDOPTS="$RPMBUILDOPTS --define '_topdir $TOP_DIR' --define '_builddir %_topdir' --define '_rpmdir %_topdir' --define '_srcrpmdir %_topdir'"
fi
export GIT_WORK_TREE=$PACKAGE_DIR
export GIT_DIR=$PACKAGE_DIR/.git
fi
[ -d "$ASSUMED_NAME/.git" ] || NEW_REPO=yes
ssh $GIT_PUSH create ${ASSUMED_NAME} || Exit_error err_cvs_add_failed
+ (
+ set -e
git init
- git remote add $REMOTE_PLD ${GIT_SERVER}/${PACKAGES_DIR}/${ASSUMED_NAME}.git && \
- git remote set-url --push $REMOTE_PLD ssh://${GIT_PUSH}/${PACKAGES_DIR}/${ASSUMED_NAME} \
- || Exit_error err_remote_problem $REMOTE_PLD
+ git remote add $REMOTE_PLD ${GIT_SERVER}/${PACKAGES_DIR}/${ASSUMED_NAME}.git
+ git remote set-url --push $REMOTE_PLD ssh://${GIT_PUSH}/${PACKAGES_DIR}/${ASSUMED_NAME}
+
+ git config --local push.default current
+ git config --local branch.master.remote $REMOTE_PLD
+ git config --local branch.master.merge refs/heads/master
+ )
+ test $? = 0 || Exit_error err_remote_problem $REMOTE_PLD
}
get_spec() {
if [ "$NOCVSSPEC" != "yes" ]; then
if [ -z "$DEPTH" ]; then
if [ -d "$PACKAGE_DIR/.git" ]; then
- git fetch $REMOTE_PLD || Exit_error err_no_spec_in_repo
+ git fetch $IPOPT $REMOTE_PLD || Exit_error err_no_spec_in_repo
elif [ "$ADD_PACKAGE_CVS" = "yes" ]; then
if [ ! -r "$PACKAGE_DIR/$SPECFILE" ]; then
echo "ERROR: No package to add ($PACKAGE_DIR/$SPECFILE)" >&2
else
(
unset GIT_WORK_TREE
- git clone -o $REMOTE_PLD ${GIT_SERVER}/${PACKAGES_DIR}/${ASSUMED_NAME}.git || {
+ git clone $IPOPT -o $REMOTE_PLD ${GIT_SERVER}/${PACKAGES_DIR}/${ASSUMED_NAME}.git || {
# softfail if new package, i.e not yet added to PLD rep
[ ! -f "$PACKAGE_DIR/$SPECFILE" ] && Exit_error err_no_spec_in_repo
- echo "Warning: package not in CVS - assuming new package"
+ echo "Warning: package not in Git - assuming new package"
NOCVSSPEC="yes"
}
- git config --local --add "remote.$REMOTE_PLD.fetch" 'refs/notes/*:refs/notes/*'
+ git config --local --add "remote.$REMOTE_PLD.fetch" 'refs/notes/*:refs/notes/*'
+ git config --local --add "remote.$REMOTE_PLD.push" 'refs/notes/*:refs/notes/*'
+ git config --local --add "remote.$REMOTE_PLD.push" HEAD
+ git config --local push.default current
git remote set-url --push $REMOTE_PLD ssh://${GIT_PUSH}/${PACKAGES_DIR}/${ASSUMED_NAME}
)
fi
fi
git init
git remote add $REMOTE_PLD ${GIT_SERVER}/${PACKAGES_DIR}/${ASSUMED_NAME}.git
- git config --local --add "remote.$REMOTE_PLD.fetch" 'refs/notes/*:refs/notes/*'
+ git config --local --add "remote.$REMOTE_PLD.fetch" 'refs/notes/*:refs/notes/*'
+ git config --local --add "remote.$REMOTE_PLD.push" 'refs/heads/*:refs/remotes/origin/*'
+ git config --local --add "remote.$REMOTE_PLD.push" HEAD
+ git config --local push.default current
git remote set-url --push $REMOTE_PLD ssh://${GIT_PUSH}/${PACKAGES_DIR}/${ASSUMED_NAME}
CVSTAG=${CVSTAG:-"master"}
fi
if [ -z "$ALL_BRANCHES" ]; then
refs="${CVSTAG}:remotes/${REMOTE_PLD}/${CVSTAG}"
fi
- git fetch $DEPTH $REMOTE_PLD $refs || {
+ git fetch $IPOPT $DEPTH $REMOTE_PLD $refs || {
echo >&2 "Error: branch $CVSTAG does not exist"
exit 3
}
fi
- git fetch $REMOTE_PLD 'refs/notes/*:refs/notes/*'
+ git fetch $IPOPT $REMOTE_PLD 'refs/notes/*:refs/notes/*'
cvsignore_df .gitignore
# add default log format to .gitignore if it is relative to package dir
if [ -n "$LOGFILE" -a "$LOGFILE" = "${LOGFILE##*/}" ]; then
# substitute known "macros" to glob
- local logfile=$(echo "$LOGFILE" | sed -e 's,\$\(PACKAGE_NAME\|DATE\|TARGET\),*,g')
+ local logfile=$(echo "$LOGFILE" | sed -r -e 's,\$(PACKAGE_(NAME|VERSION|RELEASE)|DATE|TARGET),*,g')
if [ "$logfile" ]; then
cvsignore_df "$logfile"
fi
# create symlinks for tools
if [ "$SYMLINK_TOOLS" != "no" -a -d "$PACKAGE_DIR" ]; then
- for a in dropin md5 adapter builder {relup,compile,repackage,rsync,pearize}.sh pldnotify.awk; do
+ for a in dropin md5 builder {relup,compile,repackage,rsync,pearize}.sh; do
# skip tools that don't exist in top dir
[ -f $a ] || continue
# skip tools that already exist
if [ -n "$CVSTAG" ]; then
local _rev=$(get_pkgrev "$CVSTAG")
echo "$_rev" | grep -q -E "^ERROR$" || CVSTAG="$_rev"
- if git rev-parse --verify -q "$CVSTAG"; then
+ if git rev-parse --verify -q "$CVSTAG" >/dev/null; then
git checkout "$CVSTAG" --
elif git rev-parse --verify -q "refs/remotes/${REMOTE_PLD}/$CVSTAG"; then
git checkout -t "refs/remotes/${REMOTE_PLD}/$CVSTAG" > /dev/null
if [ $(git rev-parse "$CVSTAG") != $(git rev-parse HEAD) ]; then
Exit_error "err_no_checkut" "$CVSTAG"
fi
- git merge --ff-only '@{u}'
+
+ git merge --ff-only '@{u}'
git symbolic-ref -q HEAD > /dev/null && [ "$NOCVSSPEC" != "yes" ] &&
if [ -n "$CVSDATE" ]; then
git checkout $(git rev-list -n1 --before="'$CVSDATE'" $CVSTAG) || exit 1
fi
if [ ! -f "$PACKAGE_DIR/$SPECFILE" ]; then
- Exit_error err_no_spec_in_repo
+ Exit_error err_no_spec_in_repo "$PACKAGE_DIR/$SPECFILE"
fi
if [ "$CHMOD" = "yes" -a -n "$SPECFILE" ]; then
set_spec_target
}
+# find mirrors in this order. first match wins:
+# - package dir (~/rpm/packages/foo)
+# - repository dir (~/rpm/packages)
+# - tools dir dir (~/rpm/packages/rpm-build-tools)
find_mirror() {
- cd "$REPO_DIR"
local url="$1"
- if [ ! -f "mirrors" ] ; then
- ln -s ../rpm-build-tools/mirrors .
- fi
- IFS="|"
+ update_shell_title "find_mirror[$url][$REPO_DIR]"
+
+ # NOTE: as while loop runs in subshell,
+ # we use exit 2 to indicate that the match was found
+ # otherwise we end up outputing mirror url and origin url.
+
local origin mirror name rest ol prefix
+ IFS="|"
+ cat "$PACKAGE_DIR/mirrors" "$REPO_DIR/mirrors" "$REPO_DIR/../rpm-build-tools/mirrors" /dev/null 2>/dev/null | \
while read origin mirror name rest; do
# skip comments and empty lines
if [ -z "$origin" ] || [ "${origin#\#}" != "$origin" ]; then
if [ "$prefix" = "$origin" ] ; then
suffix=$(echo "$url" | cut -b $((ol+1))-)
echo -n "$mirror$suffix"
- return 0
+ exit 2
fi
- done < mirrors
- echo "$url"
+ done && echo "$url"
}
# Warning: unpredictable results if same URL used twice
if [ "$CVSIGNORE_DF" != "yes" ]; then
return
fi
- cvsignore=${PACKAGE_DIR}/.gitignore
+ local cvsignore=${PACKAGE_DIR}/.git/info/exclude
# add only if not yet there
if ! awk -vf="$1" -vc=1 '$0 == f { c = 0 } END { exit c }' $cvsignore 2>/dev/null; then
uri="df: $uri"
fi
update_shell_title "${GETURI%% *}: $uri"
- ${GETURI} ${OUTFILEOPT} "$target" "$url" || \
- if [ "`echo $url | grep -E 'ftp://'`" ]; then
- update_shell_title "${GETURI2%% *}: $url"
- ${GETURI2} ${OUTFILEOPT} "$target" "$url"
- fi
+ ${GETURI} "$target" "$url"
fi
if [ -s "$target" ]; then
im="$i"
fi
update_shell_title "${GETURI%% *}: $im"
- ${GETURI} ${OUTFILEOPT} "$target" "$im" || \
- if [ "`echo $im | grep -E 'ftp://'`" ]; then
- update_shell_title "${GETURI2%% *}: $im"
- ${GETURI2} ${OUTFILEOPT} "$target" "$im"
- fi
+ ${GETURI} "$target" "$im"
test -s "$target" || rm -f "$target"
fi
FROM_DISTFILES=2
rm -f $target
update_shell_title "${GETURI%% *}: $url"
- ${GETURI} ${OUTFILEOPT} "$target" "$url" || \
- if [ "`echo $url | grep -E 'ftp://'`" ]; then
- update_shell_title "${GETURI2%% *}: $url"
- ${GETURI2} ${OUTFILEOPT} "$target" "$url"
- fi
+ ${GETURI} "$target" "$url"
test -s "$target" || rm -f "$target"
fi
done
if tag_exist $_tag || [ -n "$CVS_FORCE" ]; then
update_shell_title "tag sources: $_tag"
git $OPTIONS $_tag || exit
- git push $CVS_FORCE $REMOTE_PLD tag $_tag || Exit_error err_remote_problem $REMOTE_PLD
+ git push $IPOPT $CVS_FORCE $REMOTE_PLD tag $_tag || Exit_error err_remote_problem $REMOTE_PLD
else
echo "Tag $_tag already exists and points to the same commit"
fi
" $specfile
}
+# try to upgrade .spec to new version
+# if --upgrade-version is specified, use that as new version, otherwise invoke pldnotify to find new version
+#
+# return 1: if .spec was updated
+# return 0: no changes to .spec
+# exit 1 in case of error
try_upgrade() {
- if [ -n "$TRY_UPGRADE" ]; then
- local TNOTIFY TNEWVER TOLDVER
- update_shell_title "build_package: try_upgrade"
+ if [ -z "$TRY_UPGRADE" ]; then
+ return 0
+ fi
- cd "$PACKAGE_DIR"
-
- if [ "$UPGRADE_VERSION" ]; then
- TNEWVER=$UPGRADE_VERSION
- else
- if [ -n "$FLOAT_VERSION" ]; then
- TNOTIFY=$($APPDIR/pldnotify.awk ${BE_VERBOSE:+-vDEBUG=1} $SPECFILE -n) || exit 1
- else
- TNOTIFY=$($APPDIR/pldnotify.awk ${BE_VERBOSE:+-vDEBUG=1} $SPECFILE) || exit 1
- fi
+ local TNOTIFY TNEWVER TOLDVER
+ update_shell_title "build_package: try_upgrade"
- # pldnotify.awk does not set exit codes, but it has match for ERROR
- # in output which means so.
- if [[ "$TNOTIFY" = *ERROR* ]]; then
- echo >&2 "$TNOTIFY"
- exit 1
- fi
+ cd "$PACKAGE_DIR"
- TNEWVER=$(echo $TNOTIFY | awk '{ match($4,/\[NEW\]/); print $5 }')
+ if [ "$UPGRADE_VERSION" ]; then
+ TNEWVER=$UPGRADE_VERSION
+ echo "Updating spec file to version $TNEWVER"
+ else
+ if [ -n "$FLOAT_VERSION" ]; then
+ TNOTIFY=$(pldnotify ${BE_VERBOSE:+-vDEBUG=1} $SPECFILE -n) || exit 1
+ else
+ TNOTIFY=$(pldnotify ${BE_VERBOSE:+-vDEBUG=1} $SPECFILE) || exit 1
fi
- if [ -n "$TNEWVER" ]; then
- TOLDVER=`echo $TNOTIFY | awk '{ print $3; }'`
- echo "New version found, updating spec file from $TOLDVER to version $TNEWVER"
- if [ "$REVERT_BROKEN_UPGRADE" = "yes" ]; then
- cp -f $SPECFILE $SPECFILE.bak
- fi
- chmod +w $SPECFILE
- set_release $SPECFILE $PACKAGE_RELEASE 1
- set_version $SPECFILE $PACKAGE_VERSION $TNEWVER
- parse_spec
- if [ "$PACKAGE_VERSION" != "$TNEWVER" ]; then
- echo >&2 "Upgrading version failed, you need to update spec yourself"
- exit 1
- fi
- return 1
+ # pldnotify does not set exit codes, but it has match for ERROR
+ # in output which means so.
+ if [[ "$TNOTIFY" = *ERROR* ]]; then
+ echo >&2 "$TNOTIFY"
+ exit 1
fi
+
+ TOLDVER=`echo $TNOTIFY | awk '{ print $3; }'`
+ echo "New version found, updating spec file from $TOLDVER to version $TNEWVER"
+
+ TNEWVER=$(echo $TNOTIFY | awk '{ match($4,/\[NEW\]/); print $5 }')
+ fi
+
+ if [ -z "$TNEWVER" ]; then
+ return 0
+ fi
+
+ if [ "$REVERT_BROKEN_UPGRADE" = "yes" ]; then
+ cp -f $SPECFILE $SPECFILE.bak
fi
- return 0
+ chmod +w $SPECFILE
+ set_version $SPECFILE $PACKAGE_VERSION $TNEWVER
+ set_release $SPECFILE $PACKAGE_RELEASE 1
+ parse_spec
+ if [ "$PACKAGE_VERSION" != "$TNEWVER" ]; then
+ echo >&2 "Upgrading version failed, you need to update spec yourself"
+ exit 1
+ fi
+ return 1
}
build_package() {
fi
fi
+ # unset these, should not be exposed to builder shell!
+ unset GIT_WORK_TREE GIT_DIR
+ # these are set by jenkins
+ unset GIT_PREVIOUS_COMMIT GIT_URL GIT_PREVIOUS_SUCCESSFUL_COMMIT GIT_BRANCH GIT_COMMIT
+ # this may be set by user
+ unset GIT_SSH
+ # may be set by user
+ unset GIT_COMMITTER_NAME GIT_COMMITTER_EMAIL GIT_AUTHOR_NAME GIT_AUTHOR_EMAIL GIT_TESTING_PORCELAIN_COMMAND_LIST
+ # fail if something still set
+ env | grep ^GIT_ && Exit_error err_build_fail
+
local specdir=$(insert_gitlog $SPECFILE)
+ ulimit -c unlimited
# FIXME: eval here is exactly why?
- PATH=$CLEAN_PATH eval teeboth "'$logfile'" ${NICE_COMMAND} $RPMBUILD $TARGET_SWITCH $BUILD_SWITCH -v $QUIET $CLEAN $RPMOPTS $RPMBUILDOPTS $BCOND --define \'_specdir $PACKAGE_DIR\' --define \'_sourcedir $PACKAGE_DIR\' $specdir/$SPECFILE
+ PATH=$CLEAN_PATH eval teeboth "'$logfile'" ${TIME_COMMAND} ${NICE_COMMAND} $RPMBUILD $TARGET_SWITCH $BUILD_SWITCH -v $QUIET $CLEAN $RPMOPTS $RPMBUILDOPTS $BCOND --define \'_specdir $PACKAGE_DIR\' --define \'_sourcedir $PACKAGE_DIR\' $specdir/$SPECFILE
retval=$?
rm -r $specdir
package_name="${1}"
update_shell_title "run_sub_builder $package_name"
#
- # No i tutaj bym chcia³ zrobiæ sztuczn± inteligencjê, która spróbuje tego
- # pakieta zbudowaæ. Aktualnie niewiele dziala, bo generalnie nie widze do
+ # No i tutaj bym chciał zrobić sztuczną inteligencję, która spróbuje tego
+ # pakieta zbudować. Aktualnie niewiele dziala, bo generalnie nie widze do
# konca algorytmu... Ale damy rade. :) Na razie po prostu sie wyjebie tak samo
# jakby nie bylo tego kawalka kodu.
#
- # Update: Poprawi³em parê rzeczy i zaczê³o generowaæ pakiety spoza zadanej listy.
- # Jednym s³owem budowanie niespoldkowanych zale¿no¶ci dzia³a w paru przypadkach.
+ # Update: Poprawiłem parę rzeczy i zaczęło generować pakiety spoza zadanej listy.
+ # Jednym słowem budowanie niespoldkowanych zależności działa w paru przypadkach.
#
#
# y0shi.
NOT_INSTALLED_PACKAGES="$NOT_INSTALLED_PACKAGES $package_name"
}
+# install package with poldek
+# @return exit code from poldek
+#
+# this requires following sudo rules:
+# - poldek --noask --caplookup -ug
+poldek_install() {
+ LANG=C $POLDEK_CMD --noask --caplookup --uniq -ug "$@"
+}
+
+# install packages
+#
+# this requires following sudo rules:
+# - poldek -q --update --upa
+install_packages() {
+ # sync poldek indexes once per invocation
+ if [ -z "$package_indexes_updated" ]; then
+ update_shell_title "poldek: update indexes"
+ $POLDEK_CMD -q --update --upa --mo=nodesc
+ package_indexes_updated=true
+ fi
+
+ update_shell_title "install packages: $*"
+ poldek_install "$@" && return
+
+ # retry install, install packages one by one
+ # this is slower one
+ local rc=0 package
+ for package in $*; do
+ package=$(depspecname $package)
+ update_shell_title "install package: $package"
+ poldek_install "$package" || rc=$?
+ done
+ return $rc
+}
+
+uninstall_packages() {
+ update_shell_title "uninstall packages: $*"
+ $POLDEK_CMD --noask --nofollow -ev "$@"
+}
+
spawn_sub_builder() {
package_name="${1}"
update_shell_title "spawn_sub_builder $package_name"
git branch -r 2>/dev/null | grep "^ ${REMOTE_PLD}" | grep -v ${REMOTE_PLD}/HEAD | sed "s#^ *${REMOTE_PLD}/##" | xargs
}
-# checks a given list of packages/files/provides agains current rpmdb.
+# checks a given list of packages/files/provides against current rpmdb.
# outputs all dependencies which current rpmdb doesn't satisfy.
# input can be either STDIN or parameters
_rpm_prov_check() {
- local DEPS
+ local deps out
if [ $# -gt 0 ]; then
- DEPS="$@"
+ deps="$@"
else
- DEPS=$(cat)
+ deps=$(cat)
fi
- DEPS=$(LANG=C rpm -q --whatprovides $DEPS 2>&1 | awk '/^(error:|no package provides)/ { print }')
+ out=$(LC_ALL=C rpm -q --whatprovides $deps 2>&1)
# packages
- echo "$DEPS" | awk '/^no package provides/ { print $NF }'
+ echo "$out" | awk '/^no package provides/ { print $NF }'
# other deps (files)
- echo "$DEPS" | awk -F: '/^error:.*No such file/{o = $2; gsub("^ file ", "", o); print o}'
+ echo "$out" | sed -rne 's/file (.*): No such file or directory/\1/p'
}
# checks if given package/files/provides exists in rpmdb.
# install deps via information from 'rpm-getdeps' or 'rpm --specsrpm'
install_build_requires_rpmdeps() {
+ local DEPS CNFL
if [ "$FETCH_BUILD_REQUIRES_RPMGETDEPS" = "yes" ]; then
# TODO: Conflicts list doesn't check versions
- local CNFL=$(rpm-getdeps $BCOND $SPECFILE 2> /dev/null | awk '/^\-/ { print $3 } ' | _rpm_cnfl_check | xargs)
- local DEPS=$(rpm-getdeps $BCOND $SPECFILE 2> /dev/null | awk '/^\+/ { print $3 } ' | _rpm_prov_check | xargs)
+ CNFL=$(eval rpm-getdeps $BCOND $RPMOPTS $SPECFILE 2> /dev/null | awk '/^\-/ { print $3 } ' | _rpm_cnfl_check | xargs)
+ DEPS=$(eval rpm-getdeps $BCOND $RPMOPTS $SPECFILE 2> /dev/null | awk '/^\+/ { print $3 } ' | _rpm_prov_check | xargs)
fi
if [ "$FETCH_BUILD_REQUIRES_RPMSPECSRPM" = "yes" ]; then
- local CNFL=$(rpm -q --specsrpm --conflicts $BCOND $SPECFILE | awk '{print $1}' | _rpm_cnfl_check | xargs)
- local DEPS=$(rpm -q --specsrpm --requires $BCOND $SPECFILE | awk '{print $1}' | _rpm_prov_check | xargs)
+ CNFL=$(eval rpm -q --specsrpm --conflicts $BCOND $RPMOPTS $SPECFILE | awk '{print $1}' | _rpm_cnfl_check | xargs)
+ DEPS=$(eval rpm -q --specsrpm --requires $BCOND $RPMOPTS $SPECFILE | awk '{print $1}' | _rpm_prov_check | xargs)
fi
- if [ -n "$CNFL" ] || [ -n "$DEPS" ]; then
- echo "fetch BuildRequires: install [$DEPS]; remove [$CNFL]"
- update_shell_title "poldek: install [$DEPS]; remove [$CNFL]"
- $SU_SUDO /usr/bin/poldek -q --update || $SU_SUDO /usr/bin/poldek -q --upa
- fi
if [ -n "$CNFL" ]; then
- update_shell_title "uninstall conflicting packages: $CNFL"
- echo "Trying to uninstall conflicting packages ($CNFL):"
- $SU_SUDO /usr/bin/poldek --noask --nofollow -ev $CNFL
- fi
-
- while [ "$DEPS" ]; do
- update_shell_title "install deps: $DEPS"
- echo "Trying to install dependencies ($DEPS):"
- local log=.${SPECFILE}_poldek.log
- LANG=C $SU_SUDO /usr/bin/poldek --noask --caplookup -uGqQ $DEPS | tee $log
- failed=$(awk '/^error:/{a=$2; sub(/^error: /, "", a); sub(/:$/, "", a); print a}' $log)
- rm -f $log
- local ok
- if [ -n "$failed" ]; then
- for package in $failed; do
- spawn_sub_builder -bb $(depspecname $package) && ok="$ok $package"
- done
- DEPS="$ok"
- else
- DEPS=""
- fi
- done
+ echo "Uninstall conflicting packages: $CNFL"
+ uninstall_packages $CNFL
+ fi
+
+ if [ -n "$DEPS" ]; then
+ echo "Install dependencies: $DEPS"
+ install_packages $DEPS
+ fi
}
fetch_build_requires()
return
fi
- # XXX is this ugliest code written in human history still needed?
- echo "All packages installed by fetch_build_requires() are written to:"
- echo "`pwd`/.${SPECFILE}_INSTALLED_PACKAGES"
- echo ""
- echo "If anything fails, you may get rid of them by executing:"
- echo "poldek -e \`cat `pwd`/.${SPECFILE}_INSTALLED_PACKAGES\`"
- echo ""
- echo > `pwd`/.${SPECFILE}_INSTALLED_PACKAGES
- for package_item in $(cat $SPECFILE | grep -B100000 ^%changelog|grep -v ^#|grep BuildRequires|grep -v ^-|sed -e "s/^.*BuildRequires://g"|awk '{print $1}'|sed -e s,perl\(,perl-,g -e s,::,-,g -e s,\(.*\),,g -e s,%{,,g -e s,},,g|grep -v OpenGL-devel|sed -e s,sh-utils,coreutils,g -e s,fileutils,coreutils,g -e s,textutils,coreutils,g -e s,kgcc_package,gcc,g -e s,\),,g)
- do
- package_item=$(echo $package_item|sed -e s,rpmbuild,rpm-build,g |sed -e s,__perl,perl,g |sed -e s,gasp,binutils-gasp,g -e s,binutils-binutils,binutils,g -e s,apxs,apache,g|sed -e s,apache\(EAPI\)-devel,apache-devel,g -e s,kernel-headers\(netfilter\),kernel-headers,g -e s,awk,mawk,g -e s,mmawk,mawk,g -e s,motif,openmotif,g -e s,openopenmotif,openmotif,g)
- GO="yes"
- package=$(basename "$package_item"|sed -e "s/}$//g")
- COND_ARCH_TST=$(cat $SPECFILE|grep -B1 BuildRequires|grep -B1 $package|grep ifarch|sed -e "s/^.*ifarch//g")
- mach=$(uname -m)
-
- COND_TST=`cat $SPECFILE|grep BuildRequires|grep "$package"`
- if `echo $COND_TST|grep -q '^BuildRequires:'`; then
- if [ "$COND_ARCH_TST" != "" ] && [ "`echo $COND_ARCH_TST|sed -e "s/i.86/ix86/g"`" != "`echo $mach|sed -e "s/i.86/ix86/g"`" ]; then
- GO="yes"
- fi
- # bcond:
- else
- COND_NAME=`echo $COND_TST|sed -e s,:BuildRequires:.*$,,g`
- GO=""
- # %{without}
- if `echo $COND_TST|grep -q 'without_'`; then
- COND_NAME=`echo $COND_NAME|sed -e s,^.*without_,,g`
- if `echo $COND_TST|grep -q !`; then
- COND_STATE="with"
- else
- COND_STATE="wout"
- fi
- COND_WITH=`echo $AVAIL_BCONDS_WITH|grep "<$COND_NAME>"`
- COND_WITHOUT=`echo $AVAIL_BCONDS_WITHOUT|grep "<$COND_NAME>"`
- if [ -n "$COND_WITHOUT" ] || [ -z "$COND_WITH" ]; then
- COND_ARGV="wout"
- else
- COND_ARGV="with"
- fi
- # %{with}
- elif `echo $COND_TST|grep -q 'with_'`; then
- COND_NAME=`echo $COND_NAME|sed -e s,^.*with_,,g`
- if `echo $COND_TST|grep -q !`; then
- COND_STATE="wout"
- else
- COND_STATE="with"
- fi
- COND_WITH=`echo $AVAIL_BCONDS_WITH|grep "<$COND_NAME>"`
- COND_WITHOUT=`echo $AVAIL_BCONDS_WITHOUT|grep "<$COND_NAME>"`
- if [ -n "$COND_WITH" ] || [ -z "$COND_WITHOUT" ]; then
- COND_ARGV="with"
- else
- COND_ARGV="wout"
- fi
- fi
- RESULT="${COND_STATE}-${COND_ARGV}"
- case "$RESULT" in
- "with-wout" | "wout-with" )
- GO=""
- ;;
- "wout-wout" | "with-with" )
- GO="yes"
- ;;
- * )
- echo "Action '$RESULT' was not defined for package '$package_item'"
- GO="yes"
- ;;
- esac
- fi
+ die "need rpm-getdeps tool"
+}
- if [ "$GO" = "yes" ]; then
- if [ "`rpm -q $package|sed -e "s/$package.*/$package/g"`" != "$package" ]; then
- echo "Testing if $package has subrequirements..."
- run_poldek -t -i $package --dumpn=".$package-req.txt"
- if [ -f ".$package-req.txt" ]; then
- for package_name in `cat ".$package-req.txt"|grep -v ^#`
- do
- if [ "$package_name" = "$package" ]; then
- echo "Installing BuildRequired package:\t$package_name"
- update_shell_title "Installing BuildRequired package: ${package_name}"
- install_required_packages $package
- else
- echo "Installing (sub)Required package:\t$package_name"
- update_shell_title "Installing (sub)Required package: ${package_name}"
- install_required_packages $package_name
- fi
- case $? in
- 0)
- INSTALLED_PACKAGES="$package_name $INSTALLED_PACKAGES"
- echo $package_name >> `pwd`/.${SPECFILE}_INSTALLED_PACKAGES
- ;;
- *)
- echo "Attempting to run spawn sub - builder..."
- echo "Package installation failed:\t$package_name"
- run_sub_builder $package_name
- if [ $? -eq 0 ]; then
- install_required_packages $package_name
- case $? in
- 0)
- INSTALLED_PACKAGES="$package_name $INSTALLED_PACKAGES"
- echo $package_name >> `pwd`/.${SPECFILE}_INSTALLED_PACKAGES
- ;;
- *)
- NOT_INSTALLED_PACKAGES="$package_name $NOT_INSTALLED_PACKAGES"
- ;;
- esac
- fi
- ;;
- esac
- done
- rm -f ".$package-req.txt"
- else
- echo "Attempting to run spawn sub - builder..."
- echo "Package installation failed:\t$package"
- run_sub_builder $package
- if [ $? -eq 0 ]; then
- install_required_packages $package
- case $? in
- 0)
- INSTALLED_PACKAGES="$package_name $INSTALLED_PACKAGES"
- echo $package_name >> `pwd`/.${SPECFILE}_INSTALLED_PACKAGES
- ;;
- *)
- NOT_INSTALLED_PACKAGES="$package_name $NOT_INSTALLED_PACKAGES"
- ;;
- esac
- fi
- fi
- else
- echo "Package $package is already installed. BuildRequirement satisfied."
- fi
- fi
- done
- if [ "$NOT_INSTALLED_PACKAGES" != "" ]; then
- echo >&2 "Unable to install following packages and their dependencies:"
- for pkg in "$NOT_INSTALLED_PACKAGES"
- do
- echo $pkg
- done
- remove_build_requires
- exit 8
- fi
+init_repository() {
+ local remoterepo=$1
+ local localrepo=$2
+
+ if [ ! -e $localrepo ]; then
+ git clone $IPOPT -o $REMOTE_PLD ${GIT_SERVER}/$remoterepo $localrepo
+ git --git-dir=$localrepo/.git remote set-url --push $REMOTE_PLD ssh://${GIT_PUSH}/$remoterepo
+ fi
}
init_rpm_dir() {
local rpmdir=$(eval $RPM $RPMOPTS --eval '%{_rpmdir}')
local buildir=$(eval $RPM $RPMOPTS --eval '%{_builddir}')
local srpmdir=$(eval $RPM $RPMOPTS --eval '%{_srcrpmdir}')
+ local TEMPLATES=template-specs
local tmp
echo "Initializing rpm directories to $TOP_DIR from $GIT_SERVER"
mkdir -p $TOP_DIR $rpmdir $buildir $srpmdir
cd "$TOP_DIR"
- if [ ! -e ../rpm-build-tools ]; then
- git clone ${GIT_SERVER}/${PACKAGES_DIR}/rpm-build-tools.git ../rpm-build-tools
- fi
- for a in adapter builder fetchsrc_request compile repackage; do
+ init_repository ${PACKAGES_DIR}/rpm-build-tools.git ../rpm-build-tools
+ init_repository projects/$TEMPLATES ../$TEMPLATES
+ for a in builder fetchsrc_request compile repackage; do
ln -sf ../rpm-build-tools/${a}.sh $a
done
for a in md5; do
exit 1
fi
+# stuff global $BUILDER_OPTS from env as args
+if [ "$BUILDER_OPTS" ]; then
+ set -- "$BUILDER_OPTS" "$@"
+fi
+
while [ $# -gt 0 ]; do
case "${1}" in
-4|-6)
- # NOTE: we should be fetcher specific, like fille WGET_OPTS, but
- # unfortunately $GETURI is already formed
- GETURI="$GETURI $1"
+ IPOPT="${1}"
shift
;;
-5 | --update-md5)
-Upi | --update-poldek-indexes )
UPDATE_POLDEK_INDEXES="yes"
shift ;;
- --init-rpm-dir)
+ --init-rpm-dir|--init)
COMMAND="init_rpm_dir"
shift ;;
-u | --try-upgrade )
;;
--alt_kernel)
shift
- RPMOPTS="${RPMOPTS} --define \"alt_kernel $1\""
+ RPMOPTS="${RPMOPTS} --define \"alt_kernel $1\" --define \"build_kernels $1\""
shift
;;
--short-circuit)
NICE_COMMAND="nice -n ${DEF_NICE_LEVEL}"
fi
+# see time(1) for output format that could be used
+TIME_COMMAND="time -p"
+
update_shell_title "$COMMAND"
case "$COMMAND" in
"show_bconds")
fi
get_files $SOURCES $PATCHES
check_md5 $SOURCES
+ fetch_build_requires
;;
"update_md5" )
init_builder
+++ /dev/null
-#!/bin/awk -f
-#
-# Copyright (C) 2000-2013 PLD-Team <feedback@pld-linux.org>
-# Authors:
-# Sebastian Zagrodzki <zagrodzki@pld-linux.org>
-# Jacek Konieczny <jajcus@pld-linux.org>
-# Andrzej Krzysztofowicz <ankry@pld-linux.org>
-# Jakub Bogusz <qboosh@pld-linux.org>
-# Elan Ruusamäe <glen@pld-linux.org>
-#
-# See cvs log pldnotify.awk for list of contributors
-#
-# TODO:
-# - "SourceXDownload" support (use given URLs if present instead of cut-down SourceX URLs)
-# - "SourceXActiveFTP" support
-# - support debian/watch http://wiki.debian.org/debian/watch/
-
-# NOTE:
-# to test run this, run:
-# $ awk -vDEBUG=1 pldnotify.awk < specfile
-#
-# To get full out of it, you need to have following tools installed:
-# - perl, sed, wget, coreutils, util-linux
-# - perl-HTML-Tree (HTML::TreeBuilder module) for better links parser (-vUSE_PERL=0 to disable)
-# - pear (php-pear-PEAR) for php-pear package updates
-# - npm for nodejs packages
-# - gem (ruby-rubygems) for ruby/rubygem packages
-#
-# Additionally "mirrors" file in current dir, controls local mirrors you prefer
-
-function d(s) {
- if (!DEBUG) {
- return
- }
-
-# print strftime("%Y-%m-%d %H:%M:%S ") s >> "/dev/stderr"
- print s >> "/dev/stderr"
-}
-
-function fixedsub(s1,s2,t, ind) {
-# substitutes fixed strings (not regexps)
- if (ind = index(t,s1)) {
- t = substr(t, 1, ind-1) s2 substr(t, ind+length(s1))
- }
- return t
-}
-
-function ispre(s) {
- if ((s~"pre")||(s~"PRE")||(s~"beta")||(s~"BETA")||(s~"alpha")||(s~"ALPHA")||(s~"rc")||(s~"RC")) {
- d("pre-version")
- return 1
- } else {
- return 0
- }
-}
-
-function compare_ver(v1,v2) {
-# compares version numbers
- while (match(v1,/[a-zA-Z][0-9]|[0-9][a-zA-Z]/))
- v1=(substr(v1,1,RSTART) "." substr(v1,RSTART+RLENGTH-1))
- while (match(v2,/[a-zA-Z][0-9]|[0-9][a-zA-Z]/))
- v2=(substr(v2,1,RSTART) "." substr(v2,RSTART+RLENGTH-1))
- sub("^0*","",v1)
- sub("^0*","",v2)
- gsub("\.0*",".",v1)
- gsub("\.0*",".",v2)
- d("v1 == " v1)
- d("v2 == " v2)
- count=split(v1,v1a,"\.")
- count2=split(v2,v2a,"\.")
-
- if (count<count2) mincount=count
- else mincount=count2
-
- for (i=1; i<=mincount; i++) {
- if (v1a[i]=="") v1a[i]=0
- if (v2a[i]=="") v2a[i]=0
- d("i == " i)
- d("v1[i] == " v1a[i])
- d("v2[i] == " v2a[i])
- if ((v1a[i]~/[0-9]/)&&(v2a[i]~/[0-9]/)) {
- if (length(v2a[i])>length(v1a[i]))
- return 1
- else if (v2a[i]>v1a[i])
- return 1
- else if (length(v1a[i])>length(v2a[i]))
- return 0
- else if (v1a[i]>v2a[i])
- return 0
- } else if ((v1a[i]~/[A-Za-z]/)&&(v2a[i]~/[A-Za-z]/)) {
- if (v2a[i]>v1a[i])
- return 1
- else if (v1a[i]>v2a[i])
- return 0
- } else if (ispre(v1a[i]) == 1)
- return 1
- else
- return 0
- }
- if ((count2==mincount)&&(count!=count2)) {
- for (i=count2+1; i<=count; i++)
- if (ispre(v1a[i]) == 1)
- return 1
- return 0
- } else if (count!=count2) {
- for (i=count+1; i<=count2; i++)
- if (ispre(v2a[i]) == 1)
- return 0
- return 1
- }
- return 0
-}
-
-function compare_ver_dec(v1,v2) {
-# compares version numbers as decimal floats
- while (match(v1,/[0-9][a-zA-Z]/))
- v1=(substr(v1,1,RSTART) "." substr(v1,RSTART+RLENGTH-1))
- while (match(v2,/[0-9][a-zA-Z]/))
- v2=(substr(v2,1,RSTART) "." substr(v2,RSTART+RLENGTH-1))
- sub("^0*","",v1)
- sub("^0*","",v2)
- d("v1 == " v1)
- d("v2 == " v2)
- count=split(v1,v1a,"\.")
- count2=split(v2,v2a,"\.")
-
- if (count<count2) mincount=count
- else mincount=count2
-
- for (i=1; i<=mincount; i++) {
- if (v1a[i]=="") v1a[i]=0
- if (v2a[i]=="") v2a[i]=0
- d("i == " i)
- d("v1[i] == " v1a[i])
- d("v2[i] == " v2a[i])
- if ((v1a[i]~/[0-9]/)&&(v2a[i]~/[0-9]/)) {
- if (i==2) {
- if (0+("." v2a[i])>0+("." v1a[i]))
- return 1
- else if (0+("." v1a[i])>0+("." v2a[i]))
- return 0
- } else {
- if (length(v2a[i])>length(v1a[i]))
- return 1
- else if (v2a[i]>v1a[i])
- return 1
- else if (length(v1a[i])>length(v2a[i]))
- return 0
- else if (v1a[i]>v2a[i])
- return 0
- }
- } else if ((v1a[i]~/[A-Za-z]/)&&(v2a[i]~/[A-Za-z]/)) {
- if (v2a[i]>v1a[i])
- return 1
- else if (v1a[i]>v2a[i])
- return 0
- } else if (ispre(v1a[i]) == 1)
- return 1
- else
- return 0
- }
- if ((count2==mincount)&&(count!=count2)) {
- for (i=count2+1; i<=count; i++)
- if (ispre(v1a[i]) == 1)
- return 1
- return 0
- } else if (count!=count2) {
- for (i=count+1; i<=count2; i++)
- if (ispre(v2a[i]) == 1)
- return 0
- return 1
- }
- return 0
-}
-
-function link_seen(link) {
- for (seenlink in frameseen) {
- if (seenlink == link) {
- d("Link: [" link "] seen already, skipping...")
- return 1
- }
- }
- frameseen[link]=1
- return 0
-}
-
-function mktemp( _cmd, _tmpfile) {
- _cmd = "mktemp /tmp/XXXXXX"
- _cmd | getline _tmpfile
- close(_cmd)
- return _tmpfile
-}
-
-# fix link to artificial one that will be recognized rest of this script
-function postfix_link(url, link, oldlink) {
- oldlink = link
- if ((url ~/^(http|https):\/\/github.com\//) && (link ~ /.*\/tarball\//)) {
- gsub(".*\/tarball\/", "", link)
- link = link ".tar.gz"
- }
- if (oldlink != link) {
- d("POST FIXED URL [ " oldlink " ] to [ " link " ]")
- }
- return link
-}
-
-# use perl HTML::TreeBuilder module to extract links from html
-# it returns TAGNAME LINK in output which is pretty stright forward to parse in awk
-function extract_links_cmd(tmpfile) {
- return "perl -MHTML::TreeBuilder -e ' \
- my $content = join q//, <>; \
- my $root = new HTML::TreeBuilder; \
- $root->parse($content); \
- \
- my %links = (); \
- for (@{$root->extract_links(qw(a iframe))}) { \
- my($link, $element, $attr, $tag) = @$_; \
- $links{$link} = $tag; \
- } \
- \
- while (my($link, $tag) = each %links) { \
- print $tag, q/ /, $link, $/; \
- } \
- ' " tmpfile
-}
-
-# get all <A HREF=..> tags from specified URL
-function get_links(url,filename, errno,link,oneline,retval,odp,wholeodp,lowerodp,tmpfile,cmd) {
-
- wholeerr=""
-
- tmpfile = mktemp()
- tmpfileerr = mktemp()
-
- if (url ~ /^http:\/\/(download|dl)\.(sf|sourceforge)\.net\//) {
- # http://downloads.sourceforge.net/project/mediainfo/source/mediainfo/
- gsub("^http://(download|dl)\.(sf|sourceforge)\.net/", "", url)
-
- gsub("/.*", "", url)
- url = "http://sourceforge.net/projects/" url "/files/"
- d("sf url, mungled url to: " url)
- }
-
- if (url ~ /^http:\/\/(.*)\.googlecode\.com\/files\//) {
- gsub("^http://", "", url)
- gsub("\..*", "", url)
- url = "http://code.google.com/p/" url "/downloads/list"
- d("googlecode url, mungled url to: " url)
- }
-
- if (url ~ /^http:\/\/pecl.php.net\/get\//) {
- gsub("-.*", "", filename)
- url = "http://pecl.php.net/package/" filename
- d("pecl.php.net url, mungled url to: " url)
- }
-
- if (url ~ /^(http|ftp):\/\/mysql.*\/Downloads\/MySQL-5.1\//) {
- url = "http://dev.mysql.com/downloads/mysql/5.1.html#source"
- d("mysql 5.1 url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/launchpad\.net\/(.*)\//) {
- gsub("^(http|https):\/\/launchpad\.net\/", "", url)
- gsub("\/.*/", "", url)
- url = "https://code.launchpad.net/" url "/+download"
- d("main launchpad url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/edge\.launchpad\.net\/(.*)\//) {
- gsub("^(http|https):\/\/edge\.launchpad\.net\/", "", url)
- gsub("\/.*/", "", url)
- url = "https://edge.launchpad.net/" url "/+download"
- d("edge launchpad url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/github.com\/.*\/(.*)\/tarball\//) {
- gsub("\/tarball\/.*", "/downloads", url)
- d("github tarball url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/github.com\/.*\/(.*)\/archive\//) {
- gsub("\/archive\/.*", "/tags", url)
- d("github archive url, mungled url to: " url)
- }
-
- # https://bitbucket.org/logilab/pylint/get/tip.tar.bz2 -> https://bitbucket.org/logilab/pylint/downloads
- if (url ~/^(http|https):\/\/bitbucket.org\/.*\/get\/.*/) {
- gsub("\/get\/.*", "/downloads", url)
- d("github bitbucket url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/cgit\..*\/(.*)\/snapshot\//) {
- gsub("\/snapshot\/.*", "/", url)
- d("cgit snapshot tarball url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/www2\.aquamaniac\.de\/sites\/download\//) {
- url = "http://www2.aquamaniac.de/sites/download/packages.php"
- d("aquamaniac.de tarball url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/www.process-one.net\/downloads\/ejabberd\//) {
- url = "http://www.process-one.net/en/ejabberd/archive/"
- d("ejabberd tarball url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/llvm.org\/releases\//) {
- url = "http://llvm.org/releases/download.html"
- d("llvm tarball url, mungled url to: " url)
- }
-
- if (url ~/^(http|https):\/\/download\.owncloud\.org\/community\//) {
- url = "http://owncloud.org/changelog/"
- d("owncloud tarball url, mungled url to: " url)
- }
-
- d("Retrieving: " url)
- user_agent = "Mozilla/5.0 (X11; U; Linux x86_64; en-US; rv:1.9.2) Gecko/20100129 PLD/3.0 (Th) Iceweasel/3.6"
- cmd = "wget -t 2 -T 45 --user-agent \"" user_agent "\" -nv -O - \"" url "\" --passive-ftp --no-check-certificate > " tmpfile " 2> " tmpfileerr
- d("Execute: " cmd)
- errno = system(cmd)
- d("Execute done")
-
- if (errno != 0) {
- d("Reading failure response...")
- wholeerr = ""
- while (getline oneline < tmpfileerr)
- wholeerr = (wholeerr " " oneline)
- d("Error Response: " wholeerr)
-
- system("rm -f " tmpfile)
- system("rm -f " tmpfileerr)
- retval = ("WGET ERROR: " errno ": " wholeerr)
- return retval
- }
- system("rm -f " tmpfileerr)
-
- urldir = url;
- sub(/[^\/]+$/, "", urldir)
-
-if (USE_PERL) {
- cmd = extract_links_cmd(tmpfile)
- while (cmd | getline) {
- tag = $1
- link = substr($0, length(tag) + 2)
-
- if (tag == "iframe") {
- d("Frame: " link)
- if (url !~ /\//) {
- link = (urldir link)
- d("Frame->: " link)
- }
-
- if (link_seen(link)) {
- continue
- }
- retval = (retval " " get_links(link))
- }
-
- if (link_seen(link)) {
- continue
- }
-
- retval = (retval " " link)
- d("href(): " link)
- }
- close(cmd)
- system("rm -f " tmpfile)
-
- d("Returning: [" retval "]")
- return retval
-}
-
- wholeodp = ""
- d("Reading success response...")
- while (getline oneline < tmpfile) {
- wholeodp = (wholeodp " " oneline)
-# d("Response: " wholeodp)
- }
- d("Reponse read done...")
- system("rm -f " tmpfile)
-
- while (match(wholeodp, /<([aA]|[fF][rR][aA][mM][eE])[ \t][^>]*>/) > 0) {
- d("Processing links...")
- odp = substr(wholeodp,RSTART,RLENGTH);
- wholeodp = substr(wholeodp,RSTART+RLENGTH);
-
- lowerodp = tolower(odp);
- if (lowerodp ~ /<frame[ \t]/) {
- sub(/[sS][rR][cC]=[ \t]*/, "src=", odp);
- match(odp, /src="[^"]+"/)
- newurl = substr(odp, RSTART+5, RLENGTH-6)
- d("Frame: " newurl)
- if (newurl !~ /\//) {
- newurl=(urldir newurl)
- d("Frame->: " newurl)
- }
-
- if (link_seen(newurl)) {
- newurl = ""
- continue
- }
-
- retval = (retval " " get_links(newurl))
- } else if (lowerodp ~ /href=[ \t]*"[^"]*"/) {
- sub(/[hH][rR][eE][fF]=[ \t]*"/,"href=\"",odp)
- match(odp,/href="[^"]*"/)
- link=substr(odp,RSTART,RLENGTH)
- odp=substr(odp,1,RSTART) substr(odp,RSTART+RLENGTH)
- link=substr(link,7,length(link)-7)
- link=postfix_link(url, link)
-
- if (link_seen(link)) {
- link=""
- continue
- }
-
- # link ends with at least 2 digit version
- mlink = ""
- if (link ~ /^.*\/[v]*[0-9\.]+[0-9]\/$/)
- mlink = get_links(link)
-
- retval = (retval " " link " " mlink)
- d("href(\"\"): " link)
- } else if (lowerodp ~ /href=[ \t]*'[^']*'/) {
- sub(/[hH][rR][eE][fF]=[ \t]*'/,"href='",odp)
- match(odp,/href='[^']*'/)
- link=substr(odp,RSTART,RLENGTH)
- odp=substr(odp,1,RSTART) substr(odp,RSTART+RLENGTH)
- link=substr(link,7,length(link)-7)
- link=postfix_link(url, link)
-
- if (link_seen(link)) {
- link=""
- continue
- }
-
- retval = (retval " " link)
- d("href(''): " link)
- } else if (lowerodp ~ /href=[ \t]*[^ \t>]*/) {
- sub(/[hH][rR][eE][fF]=[ \t]*/,"href=",odp)
- match(odp,/href=[^ \t>]*/)
- link=substr(odp,RSTART,RLENGTH)
- odp=substr(odp,1,RSTART) substr(odp,RSTART+RLENGTH)
- link=substr(link,6,length(link)-5)
-
- if (link_seen(link)) {
- link=""
- continue
- }
-
- retval = (retval " " link)
- d("href(): " link)
- } else {
- # <a ...> but not href - skip
- d("skipping <a > without href: " odp)
- }
- }
-
- d("Returning: [" retval "]")
- return retval
-}
-
-function subst_defines(var,defs) {
-# substitute all possible RPM macros
- while ((var ~ /%{.*}/) || (var ~ /%[A-Za-z0-9_]+/)) {
- oldvar=var
- for (j in defs) {
- gsub("%{" j "}", defs[j], var)
- gsub("%" j , defs[j], var)
- }
- if (var==oldvar) {
- if (DEBUG) {
- for (i in defs) {
- d(i " == " defs[i])
- }
- }
- return var
- }
- }
- return var
-}
-
-function find_mirror(url) {
-
- while (succ = (getline line < "mirrors")) {
- if (succ==-1) { return url }
- nf=split(line,fields,"|")
- if (nf>1){
- origin=fields[1]
- mirror=fields[2]
- mname=fields[3]
- prefix=substr(url,1,length(origin))
- if (prefix==origin){
- d("Mirror found at " mname)
- close("mirrors")
- return mirror substr(url,length(origin)+1)
- }
- }
- }
-
- return url
-}
-
-# fetches file list, and compares version numbers
-function process_source(number, lurl, name, version) {
- d("Processing " lurl)
-
- if (index(lurl, version) == 0) {
- d("There is no version number ["version"] in ["lurl"]")
- return 0
- }
-
- sub("://",":",lurl)
- sub("/",":/",lurl)
- gsub("[^/]*$",":&",lurl)
- split(lurl,url,":")
- acc=url[1]
- host=url[2]
- dir=url[3]
- filename=url[4]
-
- if (index(dir,version)) {
- # directory name as version maching mode:
- # if /something/version/name-version.tarball then check
- # in /something/ looking for newer directory
- dir=substr(dir,1,index(dir,version)-1)
- sub("[^/]*$","",dir)
- sub("(\.tar\.(bz|bz2|gz|lzma|xz)|zip)$","",filename)
- }
-
- d("Will check a directory: " dir)
- d("and a file: " filename)
-
- filenameexp=filename
- gsub("[+]","\\+",filenameexp)
- sub(version,"[A-Za-z0-9.]+",filenameexp)
- gsub("[.]","\\.",filenameexp)
- sub("\.(bz|bz2|gz|lzma|xz|zip)$",".(bz|bz2|gz|lzma|xz|zip)",filenameexp)
- d("Expression: " filenameexp)
- match(filename,version)
- prever=substr(filename,1,RSTART-1)
- postver=substr(filename,RSTART+RLENGTH)
- d("Before number: " prever)
- d("and after: " postver)
- newurl=find_mirror(acc "://" host dir)
- #print acc "://" host dir
- #newurl=url[1]"://"url[2]url[3]url[4]
- #newurl=acc "://" host dir filename
- d("Looking at " newurl)
-
- references=0
- finished=0
- oldversion=version
- odp = get_links(newurl, filename)
- if( odp ~ "ERROR: ") {
- print name "(" number ") " odp
- } else {
- d("WebPage downloaded")
- c=split(odp,linki)
- for (nr=1; nr<=c; nr++) {
- addr=linki[nr]
-
- d("Found link: " addr)
-
- # github has very different tarball links that clash with this safe check
- if (!(newurl ~/^(http|https):\/\/github.com\/.*\/tarball/)) {
- if (addr ~ "[-_.0-9A-Za-z~]" filenameexp) {
- continue
- }
- }
-
- if (addr ~ filenameexp) {
- match(addr,filenameexp)
- newfilename=substr(addr,RSTART,RLENGTH)
- d("Hypothetical new: " newfilename)
- newfilename=fixedsub(prever,"",newfilename)
- newfilename=fixedsub(postver,"",newfilename)
- d("Version: " newfilename)
- if (newfilename ~ /\.(asc|sig|pkg|bin|binary|built)$/) continue
- # strip ending (happens when in directiory name as version matching mode)
- sub("(\.tar\.(bz|bz2|gz|lzma|xz)|zip)$","",newfilename)
- if (NUMERIC) {
- if ( compare_ver_dec(version, newfilename)==1 ) {
- d("Yes, there is new one")
- version=newfilename
- finished=1
- }
- } else if ( compare_ver(version, newfilename)==1 ) {
- d("Yes, there is new one")
- version=newfilename
- finished=1
- }
- }
- }
- if (finished == 0)
- print name "(" number ") seems ok: " oldversion
- else
- print name "(" number ") [OLD] " oldversion " [NEW] " version
- }
-}
-
-function rss_upgrade(name, ver, url, regex, cmd) {
- regex = "s/.*<title>" regex "<\/title>.*/\\1/p"
- cmd = "wget -t 2 -T 45 -q -O - " url " | sed -nre '" regex "' | head -n1"
-
- d("rss_upgrade_cmd: " cmd)
- cmd | getline ver
- close(cmd)
-
- return ver
-}
-
-# check for ZF upgrade from rss
-function zf_upgrade(name, ver) {
- return rss_upgrade(name, ver, \
- "http://devzone.zend.com/tag/Zend_Framework_Management/format/rss2.0", \
- "Zend Framework ([^\\s]+) Released" \
- );
-}
-
-function hudson_upgrade(name, ver) {
- return rss_upgrade(name, ver, \
- "https://hudson.dev.java.net/servlets/ProjectRSS?type=news", \
- "Hudson ([0-9.]+) released" \
- );
-}
-
-# upgrade check for pear package using PEAR CLI
-function pear_upgrade(name, ver, cmd) {
- sub(/^php-pear-/, "", name);
-
- cmd = "pear remote-info " name " | awk '/^Latest/{print $NF}'"
- d("PEAR: " cmd)
- cmd | getline ver
- close(cmd)
-
- return ver
-}
-
-function vim_upgrade(name, ver, cmd) {
- # %patchset_source -f ftp://ftp.vim.org/pub/editors/vim/patches/7.2/7.2.%03g 1 %{patchlevel}
- cmd = "wget -q -O - ftp://ftp.vim.org/pub/editors/vim/patches/" DEFS["ver"] "/MD5SUMS|grep -vF .gz|tail -n1|awk '{print $2}'"
- d("VIM: " cmd)
- cmd | getline ver
- close(cmd)
- return ver
-}
-
-function nodejs_upgrade(name, ver, cmd) {
- d("NODEJS " name " (as " DEFS["pkg"] ") " ver);
- if (DEFS["pkg"]) {
- cmd = "npm info " DEFS["pkg"] " dist-tags.latest"
- } else {
- cmd = "npm info " name " dist-tags.latest"
- }
- cmd | getline ver
- close(cmd)
-
- return ver
-}
-
-function rubygem_upgrade(name, ver, cmd, pkg) {
- if (DEFS["gem_name"]) {
- pkg = DEFS["gem_name"];
-
- } else if (DEFS["gemname"]) {
- pkg = DEFS["gemname"];
-
- } else if (DEFS["pkgname"]) {
- pkg = DEFS["pkgname"];
-
- } else {
- pkg = name;
- gsub(/^ruby-/, "", pkg);
- }
-
- cmd = "gem list --remote '^" pkg "$' | awk '/" pkg "/ {v=$2; sub(/\(/, \"\", v); print v}'"
- d("RUBYGEM " name " (as " pkg ") " ver ": " cmd);
- cmd | getline ver
-
- close(cmd)
-
- return ver
-}
-
-function chrome_upgrade(name, ver, cmd, sourceurl) {
- sourceurl = "http://dl.google.com/linux/chrome/rpm/stable/x86_64/repodata/primary.xml.gz"
- cmd = "curl -s " sourceurl " | zcat | perl -ne 'm{<name>google-chrome-" DEFS["state"] "</name>} and m{<version .*ver=.([\d.]+)} and print $1'"
- d("CHROME " cmd);
- cmd | getline ver
- close(cmd)
-
- return ver
-}
-
-function process_data(name, ver, rel, src, nver) {
- if (name ~ /^php-pear-/) {
- nver = pear_upgrade(name, ver);
- } else if (name == "ZendFramework") {
- nver = zf_upgrade(name, ver);
- } else if (name == "hudson") {
- nver = hudson_upgrade(name, ver);
- } else if (name == "vim") {
- nver = vim_upgrade(name, ver);
- } else if (name == "google-chrome") {
- nver = chrome_upgrade(name, ver);
- } else if (name ~ "^nodejs-") {
- nver = nodejs_upgrade(name, ver);
- } else if (name ~ "^ruby-") {
- nver = rubygem_upgrade(name, ver);
- }
-
- if (nver) {
- if (compare_ver(ver, nver)) {
- print name " [OLD] " ver " [NEW] " nver
- } else {
- print name " seems ok: " ver
- }
- return;
- }
-
- if (name == "xulrunner") {
- ver = subst_defines(DEFS["firefox_ver"], DEFS)
- d("package xulrunner, change version to firefox ["ver"]")
- }
-
-# this function checks if substitutions were valid, and if true:
-# processes each URL and tries to get current file list
- for (i in src) {
- if (src[i] ~ /%{nil}/) {
- gsub(/\%\{nil\}/, "", src[i])
- }
- if ( src[i] !~ /%{.*}/ && src[i] !~ /%[A-Za-z0-9_]/ ) {
- d("Source: " src[i])
- process_source(i, src[i], name, ver)
- } else {
- print FNAME ":" i ": impossible substitution: " src[i]
- }
- }
-}
-
-BEGIN {
- # if you want to use DEBUG, run script with "-v DEBUG=1"
- # or uncomment the line below
- # DEBUG = 1
-
- errno=system("wget --help > /dev/null 2>&1")
- if (errno && errno != 3) {
- print "No wget installed!"
- exit 1
- }
- if (ARGC>=3 && ARGV[2]=="-n") {
- NUMERIC=1
- for (i=3; i<ARGC; i++) ARGV[i-1]=ARGV[i]
- ARGC=ARGC-1
- }
-}
-
-FNR==1 {
- if ( ARGIND != 1 ) {
- # clean frameseen for each ARG
- for (i in frameseen) {
- delete frameseen[i]
- }
- frameseen[0] = 1
-
- process_data(NAME,VER,REL,SRC)
- NAME="" ; VER="" ; REL=""
- for (i in DEFS) delete DEFS[i]
- for (i in SRC) delete SRC[i]
- }
- FNAME=FILENAME
- DEFS["_alt_kernel"]=""
- DEFS["20"]="\\ "
- DEFS["nil"]=""
-}
-
-/^[Uu][Rr][Ll]:/&&(URL=="") { URL=subst_defines($2,DEFS) ; DEFS["url"]=URL }
-/^[Nn]ame:/&&(NAME=="") { NAME=subst_defines($2,DEFS) ; DEFS["name"]=NAME }
-/^[Vv]ersion:/&&(VER=="") { VER=subst_defines($2,DEFS) ; DEFS["version"]=VER }
-/^[Rr]elease:/&&(REL=="") { REL=subst_defines($2,DEFS) ; DEFS["release"]=REL }
-/^[Ss]ource[0-9]*:/ { if (/(ftp|http|https):\/\//) SRC[FNR]=subst_defines($2,DEFS) }
-/%define/ { DEFS[$2]=subst_defines($3,DEFS) }
-
-END {
- process_data(NAME,VER,REL,SRC)
-}
TLD / packages / rpm-build-tools.git / commitdiff