From 59b6c3310f65e47525e283c70b8891405955e609 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 11 May 2012 14:18:21 +0000
Subject: [PATCH] Change Postage to induce prefetched cache

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@12632 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/perl/xCAT/Postage.pm | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/xCAT-server/lib/perl/xCAT/Postage.pm b/xCAT-server/lib/perl/xCAT/Postage.pm
index aeb05a7a5..14d01db75 100644
--- a/xCAT-server/lib/perl/xCAT/Postage.pm
+++ b/xCAT-server/lib/perl/xCAT/Postage.pm
@@ -160,7 +160,7 @@ sub makescript
             push @scriptd, "export SITEMASTER\n";
 
             # if node has service node as master then override site master
-            my $et = $noderestab->getNodeAttribs($node, ['xcatmaster']);
+            my $et = $noderestab->getNodeAttribs($node, ['xcatmaster'],prefetchcache=>1);
             if ($et and defined($et->{'xcatmaster'}))
             {
                 $value = $et->{'xcatmaster'};
@@ -209,7 +209,7 @@ sub makescript
     push @scriptd, "export NODE\n";
 
     my $et =
-      $typetab->getNodeAttribs($node, ['os', 'arch', 'profile', 'provmethod']);
+      $typetab->getNodeAttribs($node, ['os', 'arch', 'profile', 'provmethod'],prefetchcache=>1);
     if ($^O =~ /^linux/i)
     {
         unless ($et and $et->{'os'} and $et->{'arch'})
@@ -224,7 +224,7 @@ sub makescript
 
     my $noderesent =
       $noderestab->getNodeAttribs($node,
-                                  ['nfsserver', 'installnic', 'primarynic','routenames']);
+                                  ['nfsserver', 'installnic', 'primarynic','routenames'],prefetchcache=>1);
     if ($noderesent and defined($noderesent->{'nfsserver'}))
     {
         push @scriptd, "NFSSERVER=" . $noderesent->{'nfsserver'} . "\n";
@@ -351,7 +351,7 @@ sub makescript
     push @scriptd, "export NTYPE\n";
 
     my $mactab = xCAT::Table->new("mac", -create => 0);
-    my $tmp = $mactab->getNodeAttribs($node, ['mac']);
+    my $tmp = $mactab->getNodeAttribs($node, ['mac'],prefetchcache=>1);
     if (defined($tmp) && ($tmp))
     {
         my $mac = $tmp->{mac};
@@ -363,7 +363,7 @@ sub makescript
     my $vlan;
     my $swtab = xCAT::Table->new("switch", -create => 0);
     if ($swtab) {
-	my $tmp = $swtab->getNodeAttribs($node, ['vlan']);
+	my $tmp = $swtab->getNodeAttribs($node, ['vlan'],prefetchcache=>1);
 	if (defined($tmp) && ($tmp) && $tmp->{vlan})
 	{
 	    $vlan = $tmp->{vlan};
@@ -372,7 +372,7 @@ sub makescript
 	} else {
 	    my $vmtab = xCAT::Table->new("vm", -create => 0);
 	    if ($vmtab) {
-		my $tmp1 = $vmtab->getNodeAttribs($node, ['nics']);
+		my $tmp1 = $vmtab->getNodeAttribs($node, ['nics'],prefetchcache=>1);
 		if (defined($tmp1) && ($tmp1) && $tmp1->{nics})
 		{
 		    push @scriptd, "VMNODE='YES'\n";
@@ -404,7 +404,7 @@ sub makescript
 		if (($subnet) && ($netmask)) {
 		    my $hoststab = xCAT::Table->new("hosts", -create => 0);
 		    if ($hoststab) {
-			my $tmp = $hoststab->getNodeAttribs($node, ['otherinterfaces']);
+			my $tmp = $hoststab->getNodeAttribs($node, ['otherinterfaces'],prefetchcache=>1);
 			if (defined($tmp) && ($tmp) && $tmp->{otherinterfaces})
 			{
 			    my $otherinterfaces = $tmp->{otherinterfaces};
@@ -726,7 +726,7 @@ sub makescript
 
     # get postscripts for node specific
     my $et1 =
-      $posttab->getNodeAttribs($node, ['postscripts', 'postbootscripts']);
+      $posttab->getNodeAttribs($node, ['postscripts', 'postbootscripts'],prefetchcache=>1);
     $ps = $et1->{'postscripts'};
     if ($ps)
     {