-Move rng seeding

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4289 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2009-10-02 18:04:43 +00:00
parent d7e10ac2a6
commit 3d8a45475d

View File

@ -55,6 +55,7 @@ sub getMacAddresses {
$updatesneeded = 1;
}
srand(); #Re-seed the rng. This will make the mac address generation less deterministic
while ($count > 0) { #still need more, autogen
$macaddr = "";
while (not $macaddr) {
@ -85,7 +86,6 @@ sub getMacAddresses {
sub genMac { #Generates a mac address for a node, does NOT assure uniqueness, calling code needs to do that
my $node=shift;
my $prefix = shift;
srand(); #Re-seed the rng. I haven't been able to reproduce it, but duplicate macs were somehow making it
if ($prefix) { #Specific prefix requested, honor it
my $tail = int(rand(0xffffff)); #With only 24 bits of space, use random bits;
$tail = sprintf("%06x",$tail);