From 70cb145a71dc2a3b236c9e9e068d8d7857e0b8d3 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 26 Mar 2012 17:36:51 +0000
Subject: [PATCH] Have MacMap throttle itself to 64 switches at a time to fend
 off memory starvation

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@12006 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/MacMap.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/perl-xCAT/xCAT/MacMap.pm b/perl-xCAT/xCAT/MacMap.pm
index de2fd64fa..395739517 100644
--- a/perl-xCAT/xCAT/MacMap.pm
+++ b/perl-xCAT/xCAT/MacMap.pm
@@ -337,6 +337,9 @@ sub refresh_table {
     if ($checked_pairs{$entry->{switch}}) {
       next;
     }
+    while($children > 64) {
+    	$self->handle_output($inputs);
+    }
     $checked_pairs{$entry->{switch}}=1;
     pipe my $child,my $parent;
     $child->autoflush(1);