Added ability for gitea update script to get either numbered version or alphanumeric version string

This commit is contained in:
Tracey Clark 2019-04-18 19:07:17 -05:00
commit 69c89fe712

22
update-gitea.pl Normal file → Executable file
View file

@ -25,16 +25,27 @@ my $filetype='-linux-amd64.xz';
# https://api.github.com/repos/go-gitea/gitea/releases/latest # https://api.github.com/repos/go-gitea/gitea/releases/latest
my $gitea_bin = '/home/gitea/bin/gitea'; my $gitea_bin = '/home/gitea/bin/gitea';
my $gitea_current_version_string = `$gitea_bin --version`; my $gitea_current_version_string = `$gitea_bin --version`;
unless ( defined $gitea_current_version_string ) {
die "ERROR: Unable to get the version of the gitea binary: $!";
}
my $gitea_current_version; my $gitea_current_version;
if ( $gitea_current_version_string =~ m/ion\ (\d+\.\d+\.\d*)\s+b/ ) { if ( $gitea_current_version_string =~ m/ion\ (\d+\.\d+\.\d*)\s/ ) {
$gitea_current_version = $1; $gitea_current_version = $1;
printf("Current version of gitea that is installed is $1\n");
}
elsif ( $gitea_current_version_string =~ m/ion\ (\d+\d+\w*)\s/ ) {
$gitea_current_version = $1;
printf("Current version of gitea that is installed is $1\n");
} }
my %binary_file = ( my %binary_file = (
input => $gitea_bin, input => $gitea_bin,
version => $gitea_current_version, version => $gitea_current_version,
); );
unless ( defined $gitea_current_version ) {
printf("The version of gitea that is running is \"$gitea_current_version\"\n"); die "ERROR: Unable to get the current gitea version! Value is $gitea_current_version"
}
# Backup the current binary # Backup the current binary
backup_bin( \%binary_file ); backup_bin( \%binary_file );
@ -90,10 +101,12 @@ sub backup_bin {
my $gitea_bin_backup = '/home/gitea/bin/gitea.' . $gitea_current_version . '.bz2'; my $gitea_bin_backup = '/home/gitea/bin/gitea.' . $gitea_current_version . '.bz2';
printf("Gitea bin backup will be $gitea_bin_backup\n"); printf("Gitea bin backup will be $gitea_bin_backup\n");
=devel
my $status = bzip2 $input => $gitea_bin_backup my $status = bzip2 $input => $gitea_bin_backup
or die "bzip2 failed: $Bzip2Error\n"; or die "bzip2 failed: $Bzip2Error\n";
printf("!! Status of backup operation is $status\n");
#$bz->close(); #$bz->close();
=cut
return; return;
} }
@ -101,7 +114,6 @@ sub download_bin {
my $dl_tag = shift; my $dl_tag = shift;
my $dl_filename='gitea-' . $dl_tag . $filetype; my $dl_filename='gitea-' . $dl_tag . $filetype;
printf("Downloaded filename will be $dl_filename\n"); printf("Downloaded filename will be $dl_filename\n");
# Unzip downloaded gitea
# Get the download_url from the array # Get the download_url from the array