diff options
author | Franklin Wei <franklin@rockbox.org> | 2019-10-30 23:56:05 -0400 |
---|---|---|
committer | Franklin Wei <franklin@rockbox.org> | 2019-10-30 23:56:05 -0400 |
commit | ec8b3d31470bd612d50a3fd6e60589d30a38230c (patch) | |
tree | 1bb6e9793b0a07db08f3f1a8a2b66efb3693da18 | |
parent | 19c154fe8ff25c4194abd34a649a2e3b51ea6c61 (diff) | |
download | rockbox-ec8b3d3.tar.gz rockbox-ec8b3d3.zip |
Add some scripts to automate target listing and generating build-info
This adds tools/list_targets.pl and tools/build-info.pl. list_targets does
exactly what it sounds like - it lists targets by target status. build-info
automates the generation of build-info.release for new releases.
Change-Id: I4c859fdeb54c8cc645832a7c4192f9d18590031e
-rwxr-xr-x | tools/build-info.pl | 28 | ||||
-rwxr-xr-x | tools/list_targets.pl | 27 |
2 files changed, 55 insertions, 0 deletions
diff --git a/tools/build-info.pl b/tools/build-info.pl new file mode 100755 index 0000000000..157e29fb1b --- /dev/null +++ b/tools/build-info.pl @@ -0,0 +1,28 @@ +#!/usr/bin/perl +# __________ __ ___. +# Open \______ \ ____ ____ | | _\_ |__ _______ ___ +# Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / +# Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < +# Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ +# \/ \/ \/ \/ \/ +# +# Generate the build-info.release file found on download.rockbox.org + +require "./builds.pm"; + +print "[release]\n"; + +foreach my $b (&stablebuilds) { + if(exists($builds{$b}{release})) { + print "$b=$builds{$b}{release}\n"; + } + else { + print "$b=$publicrelease\n"; + } +} + +print "[status]\n"; + +foreach my $b (&allbuilds) { + print "$b=$builds{$b}{status}\n"; +} diff --git a/tools/list_targets.pl b/tools/list_targets.pl new file mode 100755 index 0000000000..039c14f0db --- /dev/null +++ b/tools/list_targets.pl @@ -0,0 +1,27 @@ +#!/usr/bin/perl +# __________ __ ___. +# Open \______ \ ____ ____ | | _\_ |__ _______ ___ +# Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / +# Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < +# Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ +# \/ \/ \/ \/ \/ +# +# List all targets in builds.pm, categorized by target status. + +require "./builds.pm"; + +print "Stable:\n"; + +for my $b (&stablebuilds) { + print $builds{$b}{name} , "\n"; +} + +print "Unstable:\n"; +for my $b (&usablebuilds) { + print $builds{$b}{name} , "\n"; +} + +print "Unusable:\n"; +for my $b (&allbuilds) { + print $builds{$b}{name} , "\n" if($builds{$b}{status} == 1); +} |