From 47b6c89a4c2b08f33803bd2205ee88b2e42a9e8c Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 26 Mar 2012 17:36:22 +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/trunk@12005 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);