support the new style file names with model names embedded

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@3915 a1c6a512-1295-4272-9138-f99709370657

1 files changed, 23 insertions, 2 deletions

diff --git a/www/dailymod.pl b/www/dailymod.pl
index 8e503ee30d..e7bbee977b 100755
--- a/www/dailymod.pl
+++ b/www/dailymod.pl
@@ -8,7 +8,7 @@ for(@list) {
     my $dir = $_;
     opendir(DIR, "$basedir/$dir") or
         die "Can't opendir($basedir/$dir)";
-    my @files = sort grep { /^rockbox2/ } readdir(DIR);
+    my @files = sort grep { /^rockbox/ } readdir(DIR);
     closedir DIR;
 
     for(@files) {
@@ -33,26 +33,47 @@ for(reverse sort keys %date) {
     
     for(@list) {
         my $n=0;
+        my $m = $_;
         print "<td> ";
+        # old mod
         if( -f "daily/$_/rockbox${d}.mod") {
             print "<a href=\"daily/$_/rockbox${d}.mod\">mod</a>";
             $n++;
         }
-        if( -f "daily/$_/rockbox${d}.ajz") {            
+        # new mod
+        if( -f "daily/$_/rockbox-$m-${d}.mod") {
+            print "<a href=\"daily/$m/rockbox-$m-${d}.mod\">mod</a>";
+            $n++;
+        }
+        # old ajz
+        if( -f "daily/$_/rockbox${d}.ajz") {
             printf "%s<a href=\"daily/$_/rockbox${d}.ajz\">ajz</a>",
             $n?", ":"";
             $n++;
         }
+        # new ajz
+        if( -f "daily/$m/rockbox-$m-${d}.ajz") {
+            printf "%s<a href=\"daily/$m/rockbox-$m-${d}.ajz\">ajz</a>",
+            $n?", ":"";
+            $n++;
+        }
         if( -f "daily/$_/rocks${d}.zip") {
             printf "%s<a href=\"daily/$_/rocks${d}.zip\">rocks</a>",
             $n?", ":"";
             $n++;
         }
+        # old-style full zip
         if( -f "daily/$_/rockbox-${d}.zip") {
             printf "%s<a href=\"daily/$_/rockbox-${d}.zip\">full</a>",
             $n?", ":"";
             $n++;
         }
+        # new-style full zip:
+        if( -f "daily/$m/rockbox-${m}-${d}.zip") {
+            printf "%s<a href=\"daily/$_/rockbox-${m}-${d}.zip\">full</a>",
+            $n?", ":"";
+            $n++;
+        }
         if( -f "daily/$_/rockbox${d}.ucl") {
             printf "%s<a href=\"daily/$_/rockbox${d}.ucl\">ucl</a>",
             $n?", ":"";