diff --git a/update-gitea.pl b/update-gitea.pl old mode 100644 new mode 100755 index 1cd12a5..5859bbf --- a/update-gitea.pl +++ b/update-gitea.pl @@ -25,16 +25,27 @@ my $filetype='-linux-amd64.xz'; # https://api.github.com/repos/go-gitea/gitea/releases/latest my $gitea_bin = '/home/gitea/bin/gitea'; 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; -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; + 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 = ( input => $gitea_bin, version => $gitea_current_version, ); - -printf("The version of gitea that is running is \"$gitea_current_version\"\n"); +unless ( defined $gitea_current_version ) { + die "ERROR: Unable to get the current gitea version! Value is $gitea_current_version" +} # Backup the current binary backup_bin( \%binary_file ); @@ -90,10 +101,12 @@ sub backup_bin { my $gitea_bin_backup = '/home/gitea/bin/gitea.' . $gitea_current_version . '.bz2'; printf("Gitea bin backup will be $gitea_bin_backup\n"); - +=devel my $status = bzip2 $input => $gitea_bin_backup or die "bzip2 failed: $Bzip2Error\n"; + printf("!! Status of backup operation is $status\n"); #$bz->close(); +=cut return; } @@ -101,7 +114,6 @@ sub download_bin { my $dl_tag = shift; my $dl_filename='gitea-' . $dl_tag . $filetype; printf("Downloaded filename will be $dl_filename\n"); - # Unzip downloaded gitea # Get the download_url from the array