- up

[packages/rpm-build-tools.git] / pldnotify.awk

diff --git a/pldnotify.awk b/pldnotify.awk
index 70fa742b6e65e2dddba2dc720e092aabad6042be..0cf980233c4df21f0defa84dc4f8f814f495813b 100644 (file)
--- a/pldnotify.awk
+++ b/pldnotify.awk
@@ -1,4 +1,4 @@
-#!/usr/bin/gawk -f
+#!/bin/awk -f
 # $Revision$, $Date$
 #
 # Copyright (C) 2000-2010 PLD-Team <feedback@pld-linux.org>
@@ -22,8 +22,8 @@ function d(s) {
                return
        }
 
-       print strftime("%Y-%m-%d %H:%M:%S ") s >> "/dev/stderr"
-#      print s >> "/dev/stderr"
+#      print strftime("%Y-%m-%d %H:%M:%S ") s >> "/dev/stderr"
+       print s >> "/dev/stderr"
 }
 
 function fixedsub(s1,s2,t,     ind) {
@@ -200,10 +200,14 @@ function extract_links_cmd(tmpfile) {
        my $content = join q//, <>; \
        my $root = new HTML::TreeBuilder; \
        $root->parse($content); \
-       my $links_r = $root->extract_links(); \
        \
+       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
@@ -217,11 +221,9 @@ function get_links(url,filename,   errno,link,oneline,retval,odp,wholeodp,lowero
        tmpfile = mktemp()
        tmpfileerr = mktemp()
 
-       if (url ~ /^http:\/\/(download|downloads|dl)\.(sf|sourceforge)\.net\//) {
+       if (url ~ /^http:\/\/(download|dl)\.(sf|sourceforge)\.net\//) {
                # http://downloads.sourceforge.net/project/mediainfo/source/mediainfo/
                gsub("^http://(download|dl)\.(sf|sourceforge)\.net/", "", url)
-               # http://downloads.sourceforge.net/project/mediainfo/source/mediainfo/
-               gsub("^http://downloads\.(sf|sourceforge)\.net/project/", "", url)
 
                gsub("/.*", "", url)
                url = "http://sourceforge.net/projects/" url "/files/"
@@ -452,12 +454,12 @@ function find_mirror(url) {
        return url
 }
 
-function process_source(number,lurl,name,version) {
+function process_source(number, lurl, name, version) {
 # fetches file list, and compares version numbers
        d("Processing " lurl)
 
-       if ( index(lurl,version)==0 ) {
-               d("There is no version number.")
+       if (index(lurl, version) == 0) {
+               d("There is no version number ["version"] in ["lurl"]")
                return 0
        }
 
@@ -542,7 +544,7 @@ function process_source(number,lurl,name,version) {
                                }
                        }
                }
-               if (finished==0)
+               if (finished == 0)
                        print name "(" number ") seems ok: " oldversion
                else
                        print name "(" number ") [OLD] " oldversion " [NEW] " version
@@ -613,7 +615,7 @@ function vim_upgrade(name, ver,     mver, nver, vimcmd) {
        }
 }
 
-function process_data(name,ver,rel,src) {
+function process_data(name, ver, rel, src) {
        if (name ~ /^php-pear-/) {
                return pear_upgrade(name, ver);
        }
@@ -626,16 +628,20 @@ function process_data(name,ver,rel,src) {
        if (name == "vim") {
                return vim_upgrade(name, ver);
        }
+       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}/ ) {
+               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)
+                       process_source(i, src[i], name, ver)
                } else {
                        print FNAME ":" i ": impossible substitution: " src[i]
                }