GSP/Panel
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix workshop job manifest parser

Browse source
This commit is contained in:
Frank Harris 2026-06-09 10:13:29 -05:00
parent 126c12b04e
commit f2954f22fd
1 changed files with 13 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

20
Panel/modules/addonsmanager/scripts/workshop/panel_generated_steamcmd_job
View file

@ -13,20 +13,26 @@ log() {
}
json_value() {
local key="$1"
perl -0777 -ne '
my $k = shift @ARGV;
if (/"\Q$k\E"\s*:\s*"([^"]*)"/s) {
KEY="$key" MANIFEST_FILE="$MANIFEST" perl -0777 -e '
my $k = $ENV{"KEY"};
my $f = $ENV{"MANIFEST_FILE"};
open my $fh, "<", $f or exit 1;
local $/;
my $json = <$fh>;
if ($json =~ /"\Q$k\E"\s*:\s*"([^"]*)"/s) {
my $v = $1;
$v =~ s/\\\//\//g;
print $v;
exit;
exit 0;
}
if (/"\Q$k\E"\s*:\s*([0-9]+)/s) {
if ($json =~ /"\Q$k\E"\s*:\s*([0-9]+)/s) {
print $1;
exit;
exit 0;
}
' "$key" "$MANIFEST"
exit 0;
'
}
json_items() {
perl -0777 -ne '
if (/"items"\s*:\s*\[(.*?)\]/s) {