File powerpc-utils.bug-936383_snap-deprecated_warnin... of Package powerpc-utils

Overview Repositories Revisions Requests Users Attributes Meta

File powerpc-utils.bug-936383_snap-deprecated_warning_sles.patch of Package powerpc-utils (Revision e743453b9da23a2981192baaa06b3a01)

Currently displaying revision e743453b9da23a2981192baaa06b3a01 , Show latest

Index: powerpc-utils-1.2.26/scripts/snap
===================================================================
--- powerpc-utils-1.2.26.orig/scripts/snap
+++ powerpc-utils-1.2.26/scripts/snap
@@ -35,17 +35,23 @@ my $cmddir = "snap_commands";		# cmd out
 my $cmdoutdir = "$outdir/$cmddir";	# in outdir dir.
 my $rsxx_exists = 0;			# Does an IBM Flash Adapter exist?
 my $distro_file = "/etc/issue";
-my $redhat_release_file = "/etc/redhat-release";
 
-if (-e $redhat_release_file) {
-	open(RELEASE, "< $redhat_release_file") or die "open: $!\n";
-	$_ = <RELEASE>;
-	my $redhat_version = (split / /, $_)[6];
-	if ($redhat_version >= 7.0) {
-		print "snap is not supported on the RHEL 7 onwards..!\n";
-		print "Please use sosreport to collect log data..!! \n";
-		exit 1;
-	}
+my $suse_release_file = "/etc/SuSE-release";
+
+if (-e  $suse_release_file) {
+	open(RELEASE, "< $suse_release_file") or die "open: $!\n";
+	while(<RELEASE>) {
+		if ($_ =~ /VERSION/) {
+			my $suse_version = (split /=/, $_)[1];
+			if ($suse_version >= 12) {
+				print "snap is depcreated from SLES 12 onwards..!\n";
+				print "Please use supportconfig to collect log data..!! \n";
+				close(RELEASE);
+				exit 1;
+			} #check version number
+		} # match version
+	} #while
+	close(RELEASE);
 }
 
 our($opt_a, $opt_d, $opt_h, $opt_o, $opt_t, $opt_v);

Places

File powerpc-utils.bug-936383_snap-deprecated_warning_sles.patch of Package powerpc-utils (Revision e743453b9da23a2981192baaa06b3a01)

Places