]> git.pld-linux.org Git - packages/rpm-build-tools.git/blobdiff - pldnotify.awk
- man.szczecin.pl unresponsive
[packages/rpm-build-tools.git] / pldnotify.awk
index 1b3beab312848b0ce9a8be986503014f1f47b1e2..abf049305981206c12eea26ce4b59979202c7c5c 100755 (executable)
@@ -232,12 +232,14 @@ function get_links(url,filename,   errno,link,oneline,retval,odp,wholeodp,lowero
        tmpfile = mktemp()
        tmpfileerr = mktemp()
 
-       if (url ~ /^http:\/\/(download|dl)\.(sf|sourceforge)\.net\//) {
+       if (url ~ /^http:\/\/(download|downloads|dl)\.(sf|sourceforge)\.net\//) {
+               newurl = url
+               # http://dl.sourceforge.net/threestore/
                # 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/"
+               gsub("^http://(download|downloads|dl)\.(sf|sourceforge)\.net/", "", newurl)
+               gsub("^project/", "", newurl)
+               gsub("/.*", "", newurl)
+               url = "http://sourceforge.net/projects/" newurl "/rss?path=/"
                d("sf url, mungled url to: " url)
 
        } else if (url ~ /^http:\/\/(.*)\.googlecode\.com\/files\//) {
@@ -245,70 +247,75 @@ function get_links(url,filename,   errno,link,oneline,retval,odp,wholeodp,lowero
                gsub("\..*", "", url)
                url = "http://code.google.com/p/" url "/downloads/list"
                d("googlecode url, mungled url to: " url)
+
        } else 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)
 
-       } else 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)
+       } else if (url ~/http:\/\/cdn.mysql.com\//) {
+               gsub("http:\/\/cdn.mysql.com\/", "", url)
+               url = "http://vesta.informatik.rwth-aachen.de/mysql/" url
+               d("mysql CDN, mungled url to: " url)
 
-       } else if (url ~/^(http|https):\/\/launchpad\.net\/(.*)\//) {
+       } else 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)
 
-       } else if (url ~/^(http|https):\/\/edge\.launchpad\.net\/(.*)\//) {
+       } else 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)
 
-       } else if (url ~/^(http|https):\/\/github.com\/.*\/(.*)\/tarball\//) {
+       } else if (url ~ /^(http|https):\/\/github.com\/.*\/(.*)\/tarball\//) {
                gsub("\/tarball\/.*", "/downloads", url)
                d("github tarball url, mungled url to: " url)
 
-       } else if (url ~/^(http|https):\/\/github.com\/.*\/(.*)\/archive\//) {
+       } else if (url ~ /^(http|https):\/\/github.com\/.*\/(.*)\/archive\//) {
                gsub("\/archive\/.*", "/tags", url)
                d("github archive url, mungled url to: " url)
 
-       } else if (url ~/^(http|https):\/\/bitbucket.org\/.*\/get\/.*/) {
+       } else if (url ~ /^(http|https):\/\/bitbucket.org\/.*\/get\/.*/) {
                # https://bitbucket.org/logilab/pylint/get/tip.tar.bz2 -> https://bitbucket.org/logilab/pylint/downloads
                gsub("\/get\/.*", "/downloads", url)
                d("github bitbucket url, mungled url to: " url)
 
-       } else if (url ~/^(http|https):\/\/cgit\..*\/(.*)\/snapshot\//) {
+       } else if (url ~ /^(http|https):\/\/cgit\..*\/(.*)\/snapshot\//) {
                gsub("\/snapshot\/.*", "/", url)
                d("cgit snapshot tarball url, mungled url to: " url)
 
-       } else if (url ~/^(http|https):\/\/www2\.aquamaniac\.de\/sites\/download\//) {
+       } else 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)
 
-       } else if (url ~/^(http|https):\/\/www.process-one.net\/downloads\/ejabberd\//) {
+       } else 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)
 
-       } else if (url ~/^(http|https):\/\/llvm.org\/releases\//) {
+       } else 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\//) {
+       } else if (url ~ /^(http|https):\/\/download\.owncloud\.org\/community\//) {
                url = "http://owncloud.org/changelog/"
                d("owncloud tarball url, mungled url to: " url)
-       }
 
-       if (url ~/^(http|https):\/\/hackage\.haskell\.org\/packages\/archive\//) {
+       } else if (url ~ /^(http|https):\/\/hackage\.haskell\.org\/packages\/archive\//) {
                gsub("\/packages\/archive","/package",url)
                d("hackage haskell tarball url, mungled url to: " url)
-       }
 
-       if (url ~/^http:\/\/www.taskwarrior.org\/download\//) {
+       } else if (url ~ /^http:\/\/www.taskwarrior.org\/download\//) {
                url = "http://taskwarrior.org/projects/taskwarrior/wiki/Download"
                d("taskwarrior tarball url, mungled url to: " url)
+       } else if (url ~/^http:\/\/www.rarlab.com\/rar\// && filename ~ /^unrarsrc/) {
+               url = "http://www.rarlab.com/rar_add.htm"
+               d("unrar tarball url, mungled url to: " url)
+       } else if (url ~/^http:\/\/www.rarlab.com\/rar\//) {
+               url = "http://www.rarlab.com/download.htm"
+               d("rar tarball url, mungled url to: " url)
        }
 
        d("Retrieving: " url)
@@ -377,7 +384,11 @@ if (USE_PERL) {
        d("Reponse read done...")
        system("rm -f " tmpfile)
 
-       while (match(wholeodp, /<([aA]|[fF][rR][aA][mM][eE])[ \t][^>]*>/) > 0) {
+       # MATCH one of these:
+       #while (match(wholeodp, /<([aA]|[fF][rR][aA][mM][eE])[ \t][^>]*>/) > 0) {
+       #while (match(wholeodp, /<link>[^<]*<\/link>/) > 0) {
+
+       while (match(wholeodp, /(<link>[^<]*<\/link>|<([aA]|[fF][rR][aA][mM][eE])[ \t][^>]*>)/) > 0) {
                d("Processing links...")
                odp = substr(wholeodp,RSTART,RLENGTH);
                wholeodp = substr(wholeodp,RSTART+RLENGTH);
@@ -399,6 +410,7 @@ if (USE_PERL) {
                        }
 
                        retval = (retval " " get_links(newurl))
+                       d("href('condition1': " newurl)
                } else if (lowerodp ~ /href=[ \t]*"[^"]*"/) {
                        sub(/[hH][rR][eE][fF]=[ \t]*"/,"href=\"",odp)
                        match(odp,/href="[^"]*"/)
@@ -418,7 +430,7 @@ if (USE_PERL) {
                                mlink = get_links(link)
 
                        retval = (retval " " link " " mlink)
-                       d("href(\"\"): " link)
+                       d("href('condition2'): " link)
                } else if (lowerodp ~ /href=[ \t]*'[^']*'/) {
                        sub(/[hH][rR][eE][fF]=[ \t]*'/,"href='",odp)
                        match(odp,/href='[^']*'/)
@@ -433,7 +445,7 @@ if (USE_PERL) {
                        }
 
                        retval = (retval " " link)
-                       d("href(''): " link)
+                       d("href('condition3'): " link)
                } else if (lowerodp ~ /href=[ \t]*[^ \t>]*/) {
                        sub(/[hH][rR][eE][fF]=[ \t]*/,"href=",odp)
                        match(odp,/href=[^ \t>]*/)
@@ -447,7 +459,19 @@ if (USE_PERL) {
                        }
 
                        retval = (retval " " link)
-                       d("href(): " link)
+                       d("href('condition4'): " link)
+               } else if (lowerodp ~ /<link>/) {
+                       link=lowerodp
+                       sub("/<link>/", link)
+                       sub("/\/download<\/link>/", link)
+
+                       if (link_seen(link)) {
+                               link=""
+                               continue
+                       }
+
+                       retval = (retval " " link)
+                       d("href('condition5'): " link)
                } else {
                        # <a ...> but not href - skip
                        d("skipping <a > without href: " odp)
@@ -465,6 +489,8 @@ function subst_defines(var,defs) {
                for (j in defs) {
                        gsub("%{" j "}", defs[j], var)
                        gsub("%" j , defs[j], var)
+                       # conditional macros like %{?patchlevel:.5} - drop these for now
+                       gsub("%{\?" j ":.*?}", "", var)
                }
                if (var==oldvar) {
                        if (DEBUG) {
@@ -681,17 +707,30 @@ function rubygem_upgrade(name, ver,   cmd, pkg) {
        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);
+function google_linux_repo(name, ver, reponame,   cmd, sourceurl) {
+       sourceurl = "http://dl.google.com/linux/" reponame "/rpm/stable/x86_64/repodata/primary.xml.gz"
+       cmd = "curl -s " sourceurl " | zcat | perl -ne 'm{<name>" name "-" DEFS["state"] "</name>} and m{<version .*ver=.([\d.]+)} and print $1'"
+       d("google repo: " cmd);
        cmd | getline ver
        close(cmd)
 
        return ver
 }
 
-function process_data(name, ver, rel, src,   nver) {
+function jenkins_upgrade(name, ver, urls,  url, i, c, chunks, nver) {
+       for (i in urls) {
+               url = urls[i]
+               # http://mirrors.jenkins-ci.org/war-stable/1.509.1/jenkins.war?/jenkins-1.509.1.war
+               gsub("/" ver "/jenkins.war\?/jenkins-" ver ".war", "/", url);
+               c = split(get_links(url), chunks, "/")
+               # new version is second one from the bottom
+               nver = chunks[c - 2]
+               gsub(/ /, "", nver)
+               return nver;
+       }
+}
+
+function process_data(name, ver, rel,     src, nver, i) {
        if (name ~ /^php-pear-/) {
                nver = pear_upgrade(name, ver);
        } else if (name == "ZendFramework") {
@@ -701,11 +740,15 @@ function process_data(name, ver, rel, src,   nver) {
        } else if (name == "vim") {
                nver = vim_upgrade(name, ver);
        } else if (name == "google-chrome") {
-               nver = chrome_upgrade(name, ver);
+               nver = google_linux_repo(name, ver, "chrome");
+       } else if (name == "google-talkplugin") {
+               nver = google_linux_repo(name, ver, "talkplugin");
        } else if (name ~ "^nodejs-") {
                nver = nodejs_upgrade(name, ver);
-       } else if (name ~ "^ruby-") {
+       } else if (name ~ "^ruby-" || name == "chef") {
                nver = rubygem_upgrade(name, ver);
+       } else if (name ~ "jenkins") {
+               nver = jenkins_upgrade(name, ver, src);
        }
 
        if (nver) {
This page took 0.038202 seconds and 4 git commands to generate.