From 3e01b29a0d26db398d20c0d3ad4352573d1453ea Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 5 Apr 2013 20:51:06 +0000
Subject: [PATCH] Fix AAsn to not die horribly when non-reference is returned
 from some function

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.8@15837 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/xcat/plugins/AAsn.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/xCAT-server/lib/xcat/plugins/AAsn.pm b/xCAT-server/lib/xcat/plugins/AAsn.pm
index a0213dc3c..c3ec08da5 100644
--- a/xCAT-server/lib/xcat/plugins/AAsn.pm
+++ b/xCAT-server/lib/xcat/plugins/AAsn.pm
@@ -1063,6 +1063,11 @@ sub setup_TFTP
 
     # read DB for nodeinfo
     my $retdata = xCAT::ServiceNodeUtils->readSNInfo($nodename);
+    if (not ref $retdata)
+    {    # error
+        xCAT::MsgUtils->message("S", " Error reading service node arch.");
+        return 1;
+    }
     $master = $retdata->{'master'};
     $os     = $retdata->{'os'};
     $arch   = $retdata->{'arch'};