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
This commit is contained in:
Franklin Wei 2019-10-30 23:56:05 -04:00
parent 19c154fe8f
commit ec8b3d3147
2 changed files with 55 additions and 0 deletions

28
tools/build-info.pl Executable file
View file

@ -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";
}

27
tools/list_targets.pl Executable file
View file

@ -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);
}