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# This script creates the h100sums.h and h300sums.h files for fwpatcher.
4#
5# It expects a file tree with scrambled and descrambled
6# firmwares like this:
7# orig-firmware/
8# h1xx/
9# 1.66jp/
10# ihp_100.bin
11# ihp_100.hex
12# ihp_120.bin
13# ihp_120.hex
14# h3xx/
15# 1.29jp/
16# H300.bin
17# H300.hex
18# etc.
19#
20# It also expects the bootloader binaries in the current directory:
21# bootloader-h100.bin
22# bootloader-h120.bin
23# bootloader-h300.bin
24
25$orig_path = "~/orig-firmware";
26
27mksumfile("100");
28mksumfile("120");
29mksumfile("300");
30
31sub mksumfile {
32 ($model) = @_;
33
34 open FILE, ">h${model}sums.h" or die "Can't open h${model}sums.h";
35
36 print FILE "/* Checksums of firmwares for ihp_$model */\n";
37 print FILE "/* order: unpatched, patched */\n\n";
38
39 if($model < 300) {
40 foreach("1.63eu","1.63k", "1.63us", "1.65eu","1.65k", "1.65us",
41 "1.66eu", "1.66k", "1.66us", "1.66jp") {
42 `../mkboot -h100 $orig_path/h1xx/$_/ihp_$model.bin bootloader-h$model.bin ihp_$model.bin`;
43 `../scramble -iriver ihp_$model.bin ihp_$model.hex`;
44 $origsum = `md5sum $orig_path/h1xx/$_/ihp_$model.hex`;
45 chomp $origsum;
46 ($os, $or) = split / /, $origsum;
47 $sum = `md5sum ihp_$model.hex`;
48 chomp $sum;
49 ($s, $r) = split / /, $sum;
50 print FILE "/* $_ */\n";
51 print FILE "{\"$os\", \"$s\"},\n";
52 }
53 } else {
54 foreach("1.28eu", "1.28k", "1.28jp", "1.29eu", "1.29k", "1.29jp",
55 "1.30eu", "1.31k") {
56 `../mkboot -h300 $orig_path/h3xx/$_/H$model.bin bootloader-h$model.bin H$model.bin`;
57 `../scramble -iriver H$model.bin H$model.hex`;
58 $origsum = `md5sum $orig_path/h3xx/$_/H$model.hex`;
59 chomp $origsum;
60 ($os, $or) = split / /, $origsum;
61 $sum = `md5sum H$model.hex`;
62 chomp $sum;
63 ($s, $r) = split / /, $sum;
64 print FILE "/* $_ */\n";
65 print FILE "{\"$os\", \"$s\"},\n";
66 }
67 }
68 close FILE;
69}