- new sf urls

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

diff --git a/adapter.awk b/adapter.awk
index da4313e31162256490cab75f84c2419ee96dea59..9f885a857f6fdad3e90cfb68e559cbb15153662b 100644 (file)
--- a/adapter.awk
+++ b/adapter.awk
@@ -1581,19 +1581,25 @@ function unify_url(url)
 
        # sourceforge urls
        # Docs about sourceforge mirror system: http://sourceforge.net/docs/B05/
-       sub("[?&]big_mirror=.*$", "", url);
-       sub("[?&]modtime=.*$", "", url);
-       sub("[?]use_mirror=.*$", "", url);
-       sub("[?]download$", "", url);
-
        sub("^http://prdownloads\.sourceforge\.net/", "http://dl.sourceforge.net/", url)
        sub("^http://download\.sf\.net/", "http://dl.sourceforge.net/", url)
        sub("^http://download\.sourceforge\.net/", "http://dl.sourceforge.net/", url)
        sub("^http://downloads\.sourceforge\.net/", "http://dl.sourceforge.net/", url)
-
        sub("^http://.*\.dl\.sourceforge\.net/", "http://dl.sourceforge.net/", url)
        sub("^http://dl\.sourceforge\.net/sourceforge/", "http://dl.sourceforge.net/", url)
        sub("^http://dl\.sf\.net/", "http://dl.sourceforge.net/", url)
+       # 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://dl.sourceforge.net/project/", url);
+       }
+       if (url ~ /sourceforge.net/) {
+               sub("[?&]big_mirror=.*$", "", url);
+               sub("[?&]modtime=.*$", "", url);
+               sub("[?]use_mirror=.*$", "", url);
+               sub("[?]download$", "", url);
+               sub("/download$", "", 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)