Clear active rounds on changing active tournament.

[ccbs] / parse / parse-ddrfreak-songlist.pl

diff --git a/parse/parse-ddrfreak-songlist.pl b/parse/parse-ddrfreak-songlist.pl
index a880275b6f13a9022ebaba1b2568d0a005709580..d4f3e5c937d5e0f742de21a6df97efb6f46addc5 100644 (file)
--- a/parse/parse-ddrfreak-songlist.pl
+++ b/parse/parse-ddrfreak-songlist.pl
@@ -85,14 +85,21 @@ while (<>) {
                $songname = "$songname ($artist)";
        }
 
                $songname = "$songname ($artist)";
        }
 

+       # Some HTML -> UTF-8 stuff
+       $songname =~ s/&hearts;/\xe2\x9d\xa4/g;
+       $songname =~ s/&forall;/\xe2\x88\x80/g;
+       $songname =~ s/&#9733;/\xe2\x98\x85/g;
+       $songname =~ s/&#233;/\xc3\xa9/g;
+       $songname =~ s/<sup>2<\/sup>/\xc2\xb2/g;
+

        # minimal SQL escaping
        $songname =~ s/'/\\'/g;
        $artist =~ s/'/\\'/g;
 
        # Insert the song only if it doesn't already exist
        # minimal SQL escaping
        $songname =~ s/'/\\'/g;
        $artist =~ s/'/\\'/g;
 
        # Insert the song only if it doesn't already exist

-       printf "INSERT INTO songs SELECT nextval('songs_song_seq') AS song, '%s' AS title, '%s' AS artist, 0 AS minbpm, 0 AS maxbpm WHERE '%s' NOT IN ( SELECT title FROM songs );\n",
+       printf "INSERT INTO songs SELECT nextval('songs_song_seq') AS song, '%s' AS title, '%s' AS artist, 0 AS minbpm, 0 AS maxbpm WHERE LOWER('%s') NOT IN ( SELECT LOWER(title) FROM songs );\n",

                $songname, $artist, $songname;
                $songname, $artist, $songname;

-       printf "INSERT INTO machinesongs SELECT ( SELECT song FROM songs WHERE title='%s' ), ( SELECT machine FROM machines WHERE machinename='%s' );\n",
+       printf "INSERT INTO machinesongs SELECT ( SELECT song FROM songs WHERE LOWER(title)=LOWER('%s') ), ( SELECT machine FROM machines WHERE machinename='%s' );\n",

                $songname, $machine;
        
        for my $t (['single', 'beginner', $sb],
                $songname, $machine;
        
        for my $t (['single', 'beginner', $sb],


@@ -105,7 +112,7 @@ while (<>) {
                    ['double', 'expert', $de],
                    ['double', 'challenge', $dc]) {
                next if (!defined($t->[2]) || $t->[2] eq '');
                    ['double', 'expert', $de],
                    ['double', 'challenge', $dc]) {
                next if (!defined($t->[2]) || $t->[2] eq '');

-               printf "INSERT INTO songratings (song,machine,playmode,difficulty,feetrating) VALUES ((SELECT song FROM songs WHERE title='%s'),(SELECT machine FROM machines WHERE machinename='%s'),'%s','%s',%u);\n",
+               printf "INSERT INTO songratings (song,machine,playmode,difficulty,feetrating) VALUES ((SELECT song FROM songs WHERE LOWER(title)=LOWER('%s')),(SELECT machine FROM machines WHERE machinename='%s'),'%s','%s',%u);\n",

                        $songname, $machine, $t->[0], $t->[1], $t->[2];
        }
 }
                        $songname, $machine, $t->[0], $t->[1], $t->[2];
        }
 }