UNLOZE/sourcemod
10
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Attempted to lcase dll dirs in the symstore.

Browse Source
This commit is contained in:
David Anderson 2008-11-11 01:36:15 -08:00
parent 6c1259f6e6
commit b1646accb9
1 changed files with 22 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
tools/buildbot/symstore.pl
View File

@ -33,6 +33,28 @@ while (<PDBLOG>)
close(PDBLOG);
#Lowercase DLLs. Sigh.
my (@files);
opendir(DIR, "..\\..\\symstore");
@files = readdir(DIR);
closedir(DIR);
my ($i, $j, $file, @subdirs);
for ($i = 0; $i <= $#files; $i++)
{
$file = $files[$i];
next unless ($file =~ /\.dll$/);
next unless (-d "..\\..\\symstore\\$file");
opendir(DIR, "..\\..\\symstore\\$file");
@subdirs = readdir(DIR);
closedir(DIR);
for ($j = 0; $j < $#subdirs; $j++)
{
next unless ($subdirs[$j] =~ /[A-Z]/);
Build::Command("rename ..\\..\\symstore\\$file\\" . $subdirs[$j] . " ..\\..\\symstore\\$file\\" . lc($subdirs[$j]));
}
}
#Now that we're done, rsync back.
rsync('../../symstore/', 'sourcemod@alliedmods.net:~/public_html/symbols');