tsiry-sandratraina.com
A modern Music Player Daemon based on Rockbox open source high quality audio player
libadwaita
audio
rust
zig
deno
mpris
rockbox
mpd
1#!/usr/bin/perl
2# __________ __ ___.
3# Open \______ \ ____ ____ | | _\_ |__ _______ ___
4# Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
5# Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
6# Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
7# \/ \/ \/ \/ \/
8#
9# Generate the build-info.release file found on download.rockbox.org
10
11require "./builds.pm";
12
13my $baseurl="https://download.rockbox.org";
14
15print "[release]\n";
16print "build_url=$baseurl/release/%VERSION%/rockbox-%TARGET%-%VERSION%.zip\n";
17print "voice_url=$baseurl/release/%VERSION%/voice-%TARGET%-%VERSION%-%LANGUAGE%.zip\n";
18print "manual_url=$baseurl/release/%VERSION%/rockbox-%TARGET%-%VERSION%%FORMAT%\n";
19print "font_url=$baseurl/release/%VERSION%/rockbox-fonts-%VERSION%.zip\n";
20print "source_url=$baseurl/release/%VERSION%/rockbox-source-%VERSION%.7z\n";
21
22foreach my $b (&stablebuilds) {
23 my $ver;
24 if(exists($builds{$b}{release})) {
25 $ver = $builds{$b}{release};
26 } else {
27 $ver = $publicrelease;
28 }
29 if ($ver <= $publicrelease) {
30 print "$b=$ver\n";
31 }
32}
33
34print "[status]\n";
35
36foreach my $b (&allbuilds) {
37 my $ver;
38 my $status = $builds{$b}{status};
39
40 if(exists($builds{$b}{release})) {
41 $ver = $builds{$b}{release};
42 } else {
43 $ver = $publicrelease;
44 }
45 if ($ver > $publicrelease) {
46 $status=2;
47 }
48 print "$b=$status\n";
49}
50
51print "\n";