- more debug, don't hang on empty hrefs

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

diff --git a/pldnotify.awk b/pldnotify.awk
index 71cc530258859ac262c844d6a0450875653154b6..ecc71bbb8464b3f4903f0e28fa87e5212d1ce2fc 100644 (file)
--- a/pldnotify.awk
+++ b/pldnotify.awk
@@ -159,9 +159,9 @@ function get_links(url,     errno,link,oneline,retval,odp,tmpfile) {
                        if (tolower(odp) ~ /<frame[ \t]/) {
                                match(tolower(odp),/<frame[ \t][^>]*>/)
                                ramka=substr(odp,RSTART,RLENGTH)
-                               odp=substr(odp,RSTART+RLENGTH)
-                               sub(/[sS][rR][cC]=[ \t]+/,"src=",ramka);
-                               match(tolower(ramka),/src="[^"]+"/)
+                               odp=substr(odp,1,RSTART) substr(odp,RSTART+RLENGTH)
+                               sub(/[sS][rR][cC]=[ \t]*/,"src=",ramka);
+                               match(ramka,/src="[^"]+"/)
                                newurl=substr(ramka,RSTART+5,RLENGTH-6)
                                if (DEBUG) print "Ramka: " newurl
                                if (newurl !~ /\//) {
@@ -169,20 +169,30 @@ function get_links(url,   errno,link,oneline,retval,odp,tmpfile) {
                                        if (DEBUG) print "Ramka->: " newurl
                                }
                                retval=(retval " " get_links(newurl))
-                       } else if (tolower(odp) ~ /href=[ \t]*"[^"]+"/) {
-                               sub(/[hH][rR][eE][fF]=[ \t]+/,"href=",odp)
-                               match(tolower(odp),/href="[^"]+"/)
+                       } else if (tolower(odp) ~ /href=[ \t]*"[^"]*"/) {
+                               sub(/[hH][rR][eE][fF]=[ \t]*"/,"href=\"",odp)
+                               match(odp,/href="[^"]*"/)
                                link=substr(odp,RSTART,RLENGTH)
-                               odp=substr(odp,RSTART+RLENGTH)
+                               odp=substr(odp,1,RSTART) substr(odp,RSTART+RLENGTH)
                                link=substr(link,7,length(link)-7)
                                retval=(retval " " link)
-                       } else if (tolower(odp) ~ /href=[ \t]*[^ \t>]+/) {
-                               sub(/[hH][rR][eE][fF]=[ \t]+/,"href=",odp)
-                               match(tolower(odp),/href=[^ \t>]+/)
+                               if (DEBUG) print "href(\"\"): " link
+                       } else if (tolower(odp) ~ /href=[ \t]*'[^']*'/) {
+                               sub(/[hH][rR][eE][fF]=[ \t]*'/,"href='",odp)
+                               match(odp,/href='[^']*'/)
                                link=substr(odp,RSTART,RLENGTH)
-                               odp=substr(odp,RSTART+RLENGTH)
+                               odp=substr(odp,1,RSTART) substr(odp,RSTART+RLENGTH)
+                               link=substr(link,7,length(link)-7)
+                               retval=(retval " " link)
+                               if (DEBUG) print "href(''): " link
+                       } else if (tolower(odp) ~ /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)
                                retval=(retval " " link)
+                               if (DEBUG) print "href(): " link
                        } else {
                                retval=(retval " INTERNAL_ERROR")
                                break
@@ -295,6 +305,7 @@ function process_source(number,lurl,name,version) {
                                newfilename=fixedsub(prever,"",newfilename)
                                newfilename=fixedsub(postver,"",newfilename)
                                if (DEBUG) print "Wersja: " newfilename
+                               if (newfilename ~ /\.(pkg|bin|binary)$/) continue
                                if (NUMERIC) {
                                        if ( compare_ver_dec(version, newfilename)==1 ) {
                                                if (DEBUG) print "Tak, jest nowa"