From c4cc4bdcbca19ea148cd58d3fe2c5d6405da135a Mon Sep 17 00:00:00 2001
From: Bart Van Assche <bvanassche@acm.org>
Date: Mon, 18 Feb 2019 00:38:50 +0000
Subject: [PATCH] scstadmin: Avoid dereferencing variables that have the value
 undef

git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@7950 d57e44dd-8a1f-0410-8b47-8ef2f437770f
---
 scstadmin/scstadmin.sysfs/scst-1.0.0/lib/SCST/SCST.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/scstadmin/scstadmin.sysfs/scst-1.0.0/lib/SCST/SCST.pm b/scstadmin/scstadmin.sysfs/scst-1.0.0/lib/SCST/SCST.pm
index fca271819..e66934ece 100644
--- a/scstadmin/scstadmin.sysfs/scst-1.0.0/lib/SCST/SCST.pm
+++ b/scstadmin/scstadmin.sysfs/scst-1.0.0/lib/SCST/SCST.pm
@@ -777,6 +777,7 @@ sub aluaAttributes {
 			chomp $value;
 
 			my $second_line = <$io>;
+			$second_line = "" if (!defined($second_line));
 			if (new_sysfs_interface() && !$is_static
 			    || ($second_line =~ /\[key\]/)) {
 				my $key = 0;
@@ -2633,6 +2634,7 @@ sub deviceAttributes {
 				} elsif ($linked =~ /^(\.\.\/)*$t\/([^\/]+)\/([^\/]+)\/$l\/(\d+)$/) {
 					$driver = $2;
 					$target = $3;
+					$group = "";
 					$lun = $4;
 				} else {
 					print("internal error: could not parse $linked\n");