nihilazo
/
rockbox
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

copy the images for the skins. 

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@26513 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Jonathan Gordon 2010-06-03 13:59:32 +00:00
parent bf3e50b89b
commit a5555c08fe
1 changed files with 37 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
tools/buildtheme.pl
View File

@ -264,8 +264,9 @@ sub copyskin
my @filelist;
my $src;
my $dest;
my $sizestring;
if($wpslist =~ /(.*)OUT/) {
if($wpslist =~ /(.*)WPSFILE/) {
$dir = $1;
# first try the actual filename given to us
@ -274,6 +275,10 @@ sub copyskin
$src = "${dir}$skin.$ext";
if ( -e $src )
{
if ($skin =~ /\w\.(\d*x\d*x\d*).*/)
{
$sizestring = $1;
}
my $cmd = "cp $src $rbdir/wps/$themename.$ext";
`$cmd`;
}
@ -287,13 +292,13 @@ sub copyskin
foreach my $d (@depthlist)
{
next if ($d > $depth);
$src = "${dir}$skin.${width}x${height}x${d}.$ext";
$sizestring = "${width}x${height}x${d}";
$src = "${dir}$skin.${sizestring}.$ext";
last if (-e $src);
}
if (-e $src)
{
my $cmd = "cp $src $rbdir/wps/$themename.$ext";
print "$cmd\n";
`$cmd`;
}
elsif (-e "${dir}$skin.$ext")
@ -304,6 +309,35 @@ sub copyskin
else
{
#print STDERR "buildtheme warning: No suitable skin file for $ext\n";
return;
}
}
open(WPSFILE, "$rbdir/wps/$themename.$ext");
while (<WPSFILE>) {
$filelist[$#filelist + 1] = $1 if (/\|([^|]*?.bmp)\|/);
}
close(WPSFILE);
if ($#filelist >= 0)
{
my $file;
if ($sizestring && -e "$dir/$themename/$sizestring")
{
foreach $file (@filelist)
{
system("cp $dir/$themename/$sizestring/$file $rbdir/wps/$themename/");
}
}
elsif (-e "$dir/$themename")
{
foreach $file (@filelist)
{
system("cp $dir/$themename/$file $rbdir/wps/$themename/");
}
}
else
{
print STDERR "beep, no dir to copy WPS from!\n";
}
}
}