From 35a00370ae44448d5cbaf1206fccd33f031caeb4 Mon Sep 17 00:00:00 2001
From: Mark Buechler <mark.buechler@gmail.com>
Date: Fri, 25 Sep 2009 14:00:08 +0000
Subject: [PATCH] - Print a friendly warning if -issuelip (or it's config
 option) is used   and the target drives lacks support for it.

git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@1142 d57e44dd-8a1f-0410-8b47-8ef2f437770f
---
 scstadmin/scstadmin | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/scstadmin/scstadmin b/scstadmin/scstadmin
index dfdbed46f..3989fe1a7 100755
--- a/scstadmin/scstadmin
+++ b/scstadmin/scstadmin
@@ -1783,6 +1783,8 @@ sub enableTarget {
 }
 
 sub issueLIP {
+	my $lip_issued;
+
 	foreach my $target (keys %{$TARGETS}) {
 		next if ($$TARGETS{$target}->{'duplicate'});
 		next if (!$$TARGETS{$target}->{'enabled'});
@@ -1800,8 +1802,13 @@ sub issueLIP {
 			}
 
 			print "done.\n";
+
+			$lip_issued = $TRUE;
 		}
 	}
+
+	print "\t-> WARNING: This target driver does not support issuing LIPs.\n\n"
+	  if (!$lip_issued);
 }
 
 sub readConfig {