diff options
author | Jonas Häggqvist <rasher@rasher.dk> | 2009-03-06 18:11:51 +0000 |
---|---|---|
committer | Jonas Häggqvist <rasher@rasher.dk> | 2009-03-06 18:11:51 +0000 |
commit | a32b73e9c3461e3917963871c5638234635904da (patch) | |
tree | 0d9d364c18b5be415379a2dfc36ac7f0ce0e59e6 /tools/release/sims.pl | |
parent | 2b6e4adbd2cd2880e4d94d9519361617bfe8e755 (diff) | |
download | rockbox-a32b73e9c3461e3917963871c5638234635904da.tar.gz rockbox-a32b73e9c3461e3917963871c5638234635904da.zip |
Smarten up the w32sims.pl script and rename it to sims.pl, since it does all sorts of sims now.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@20215 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools/release/sims.pl')
-rwxr-xr-x | tools/release/sims.pl | 183 |
1 files changed, 183 insertions, 0 deletions
diff --git a/tools/release/sims.pl b/tools/release/sims.pl new file mode 100755 index 0000000000..932611794b --- /dev/null +++ b/tools/release/sims.pl @@ -0,0 +1,183 @@ +#!/usr/bin/perl +# This is basically a copy of tools/release/bins.pl, with small changes. +use File::Basename; +use File::Path; +use Cwd; + +my $verbose, $update, $doonly, $version; +my @doonly; + +my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time()); +$year+=1900; +$mon+=1; +$verbose=0; + +my $filename = "rockbox-sim-<target>-<version>"; + +while (scalar @ARGV > 0) { + if ($ARGV[0] eq "-h") { + print $ARGV[0]."\n"; + print <<MOO +Usage: w32sims [-v] [-u] [-r VERSION] [-f filename] [buildonly] + -v Verbose output + -u Run svn up before building + -r Use the specified version string for filenames (defaults to SVN + revision) + -f Filename format string (without extension). This can include a + filepath (relative or absolute) May include the following special + strings: + <version> - Replaced by the revision (or version name if -r is + used) + <target> - Target shortname + <YYYY> - Year (4 digits) + <MM> - Month (2 digits) + <DD> - Day of month (2 digits - 0-padded) + <HH> - Hour of day (2 digits, 0-padded, 00-23) + <mm> - Minute (2 digits, 0-padded) + The default filename is rockbox-sim-<target>-<version> +MOO +; + exit 1; + } + elsif ($ARGV[0] eq "-v") { + $verbose =1; + } + elsif ($ARGV[0] eq "-u") { + $update =1; + } + elsif ($ARGV[0] eq "-r") { + $version =$ARGV[1]; + shift @ARGV; + } + elsif ($ARGV[0] eq "-f") { + $filename = $ARGV[1]; + shift @ARGV; + } + else { + push(@doonly,$ARGV[0]); + # This will only be printed if the -v flag comes earler + print "only build ${ARGV[0]}\n" if($verbose); + } + shift @ARGV; +} + +if($update) { + # svn update! + system("svn -q up"); +} + +$test = `sdl-config --libs`; +if ($test eq "") { + printf("You don't appear to have sdl-config\n"); + die(); +} + +$rev = `tools/version.sh .`; +chomp $rev; +print "rev $rev\n" if($verbose); + +if (!defined($version)) { + $version = $rev; +} + +# made once for all targets +sub runone { + my ($dir, $confnum, $extra)=@_; + my $a; + + if(!grep(/$dir/, @doonly)) { + return; + } + + mkdir "build-$dir"; + chdir "build-$dir"; + print "Build in build-$dir\n" if($verbose); + + # build the target + $a = buildit($dir, $confnum, $extra); + + chdir ".."; + + my $newo=$filename; + + $newo =~ s/<version>/$version/g; + $newo =~ s/<target>/$dir/g; + $newo =~ s/<YYYY>/$year/g; + $newo =~ s/<MM>/$mon/g; + $newo =~ s/<DD>/$mday/g; + $newo =~ s/<HH>/$hour/g; + $newo =~ s/<mm>/$min/g; + + + print "Zip up the sim and associated files\n" if ($verbose); + print("Output: $newo\n"); + print("Dir: " . dirname($newo) . "\n"); + mkpath(dirname($newo)); + system("mv build-$dir $newo"); + if (-f "$newo/rockboxui.exe") { + print "Find and copy SDL.dll\n" if ($verbose); + `cp \`dirname \\\`which sdl-config\\\`\`/SDL.dll ./$newo/`; + } + my $toplevel = getcwd(); + chdir(dirname($newo)); + print(getcwd()."\n"); + $cmd = "zip -9 -r -q ".basename($newo)." ".basename($newo)."/{rockboxui*,UI256.bmp,SDL.dll,simdisk}"; + print("$cmd\n"); + `$cmd`; + chdir($toplevel); + + print "remove all contents in $newo\n" if($verbose); +# system("rm -rf $newo"); + + return $a; +}; + +sub buildit { + my ($target, $confnum, $extra)=@_; + + `rm -rf * >/dev/null 2>&1`; + + my $c = sprintf('printf "%s\n%ss\n" | ../tools/configure', + $confnum, $extra); + + print "C: $c\n" if($verbose); + `$c`; + + print "Run 'make'\n" if($verbose); + `make 2>/dev/null`; + + print "Run 'make install'\n" if($verbose); + `make install 2>/dev/null`; +} + +runone("player", "player", '\n'); +runone("recorder", "recorder", '\n'); +runone("recorder8mb", "recorder", '8\n'); +runone("fmrecorder", "fmrecorder", '\n'); +runone("fmrecorder8mb", "fmrecorder", '8\n'); +runone("recorderv2", "recorderv2", '\n'); +runone("ondiosp", "ondiosp", '\n'); +runone("ondiofm", "ondiofm", '\n'); +runone("h100", "h100"); +runone("h120", "h120"); +runone("h300", "h300"); +runone("ipodcolor", "ipodcolor"); +runone("ipodnano", "ipodnano"); +runone("ipod4gray", "ipod4g"); +runone("ipodvideo", "ipodvideo", '32\n'); +runone("ipodvideo64mb", "ipodvideo", '64\n'); +runone("ipod3g", "ipod3g"); +runone("ipod1g2g", "ipod1g2g"); +runone("iaudiox5", "x5"); +runone("iaudiom5", "m5"); +runone("iaudiom3", "m3"); +runone("ipodmini1g", "ipodmini"); +runone("ipodmini2g", "ipodmini2g"); +runone("h10", "h10"); +runone("h10_5gb", "h10_5gb"); +runone("gigabeatf", "gigabeatf"); +runone("sansae200", "e200"); +runone("sansac200", "c200"); +#runone("mrobe500", "mrobe500"); +runone("mrobe100", "mrobe100"); +runone("cowond2", "cowond2"); |