From 710207375c94ee150e00aaaa8d53be04b377cc40 Mon Sep 17 00:00:00 2001
From: yinle <yinle@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 19 Oct 2011 08:58:50 +0000
Subject: [PATCH] Fix bug 3425775:lsslp plugin bug
 /opt/xcat/lib/perl/xCAT/NetworkUtils.pm

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10837 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/xcat/plugins/lsslp.pm | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/xCAT-server/lib/xcat/plugins/lsslp.pm b/xCAT-server/lib/xcat/plugins/lsslp.pm
index fed073e7a..451a6555e 100644
--- a/xCAT-server/lib/xcat/plugins/lsslp.pm
+++ b/xCAT-server/lib/xcat/plugins/lsslp.pm
@@ -2361,11 +2361,15 @@ sub parse_responses {
                         $matchhmc = 1; 
                         $result[4] = $ii;
                     } elsif (exists($opt{i})){
-                        my $subnet = $addr{$opt{i}}{subnet};
-                        my $netmask = $addr{$opt{i}}{netmask};
-                        if(xCAT::NetworkUtils->ishostinsubnet($ii, $netmask, $subnet)) {
-                            $matchhmc = 1;
-                            $result[4] = $ii;
+                        my @userip = split /,/, $opt{i};
+                        foreach my $uip (@userip) {
+                            my $subnet = $addr{$uip}{subnet};
+                            my $netmask = $addr{$uip}{netmask};
+                            if(xCAT::NetworkUtils->ishostinsubnet($ii, $netmask, $subnet)) {
+                                $matchhmc = 1;
+                                $result[4] = $ii;
+                                next;
+                            }
                         }
                     }
                     push @iptmp2,$ii;