mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-04 16:26:53 +00:00
93451ea964
For quite some time, ScummVM is available in the Snap store thanks to the Snapcrafters community. A while back I started to contribute to the package and we made great progress there - the ScummVM snap is now (almost) on par with our other releases. However, this snapcraft.yaml file is now more or less obsolete since it lacks basically all improvements we made so far. The long term goal is to become the official maintainers of the ScummVM snap - we are almost there, just a few minor issues are remaining. I'm dropping this snapcraft.yaml file since it's heavily outdated. Please follow - https://github.com/snapcrafters/scummvm/ for now. As soon as the Snap is really stable, I'll merge snapcrafters/scummvm back into this repository, so development can continue here.
79 lines
2.0 KiB
Perl
Executable File
79 lines
2.0 KiB
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
#
|
|
# This script is a hack to update the ScummVM version in all (?) files that
|
|
# contain it. Obviously, it should be used before a release.
|
|
|
|
use strict;
|
|
|
|
if ($#ARGV+1 < 3 or $#ARGV+1 > 4) {
|
|
# TODO: Allow the user to specify the version as "1.2.3svn"
|
|
# and automatically split that into 1, 2, 3, svn
|
|
print STDERR "Usage: $0 MAJOR MINOR PATCH [EXTRA]\n";
|
|
print STDERR " TODO\n";
|
|
exit 1;
|
|
}
|
|
|
|
# TODO: Verify that major/minor/patch are actually numbers
|
|
my $VER_MAJOR = $ARGV[0];
|
|
my $VER_MINOR = $ARGV[1];
|
|
my $VER_PATCH = $ARGV[2];
|
|
my $VER_EXTRA = $ARGV[3];
|
|
my $VERSION = "$VER_MAJOR.$VER_MINOR.$VER_PATCH$VER_EXTRA";
|
|
|
|
die "MAJOR must be a natural number\n" unless ($VER_MAJOR =~ /^\d+$/);
|
|
die "MINOR must be a natural number\n" unless ($VER_MINOR =~ /^\d+$/);
|
|
die "PATCH must be a natural number\n" unless ($VER_PATCH =~ /^\d+$/);
|
|
|
|
|
|
print "Setting version to '$VERSION'\n";
|
|
|
|
|
|
# List of the files in which we need to perform substitution.
|
|
my @subs_files = qw(
|
|
base/internal_version.h
|
|
dists/redhat/scummvm.spec
|
|
dists/redhat/scummvm-tools.spec
|
|
dists/slackware/scummvm.SlackBuild
|
|
dists/macosx/Info.plist
|
|
dists/macosx/dockplugin/Info.plist
|
|
dists/iphone/Info.plist
|
|
dists/ios7/Info.plist
|
|
dists/irix/scummvm.spec
|
|
dists/wii/meta.xml
|
|
dists/android/AndroidManifest.xml
|
|
dists/openpandora/PXML.xml
|
|
dists/openpandora/README-OPENPANDORA
|
|
dists/openpandora/README-PND.txt
|
|
dists/openpandora/index.html
|
|
dists/gph/README-GPH
|
|
dists/gph/scummvm.ini
|
|
dists/riscos/!Boot,feb
|
|
dists/amiga/RM2AG.rexx
|
|
backends/platform/psp/README.PSP
|
|
);
|
|
|
|
my %subs = (
|
|
VER_MAJOR => $VER_MAJOR,
|
|
VER_MINOR => $VER_MINOR,
|
|
VER_PATCH => $VER_PATCH,
|
|
VER_EXTRA => $VER_EXTRA,
|
|
VERSION => $VERSION
|
|
);
|
|
|
|
foreach my $file (@subs_files) {
|
|
print "Processing $file...\n";
|
|
open(INPUT, "< $file.in") or die "Can't open '$file.in' for reading: $!\n";
|
|
open(OUTPUT, "> $file") or die "Can't open '$file' for writing: $!\n";
|
|
|
|
while (<INPUT>) {
|
|
while (my ($key, $value) = each(%subs)) {
|
|
s/\@$key\@/$value/;
|
|
}
|
|
print OUTPUT;
|
|
}
|
|
|
|
close(INPUT);
|
|
close(OUTPUT);
|
|
}
|