mirror of
				https://github.com/xcat2/xcat-core.git
				synced 2025-11-03 21:02:34 +00:00 
			
		
		
		
	fix bug 3531: New CMM firmware is adding node # ( textid ) wrapper around textd - breaks rscan -u
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.8@16090 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
		@@ -1577,7 +1577,13 @@ sub rscan {
 | 
			
		||||
    if ($name =~ /Comm Error/) {
 | 
			
		||||
      next;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    if ($data[1] =~ /\(\s*([^\s]*)\s*\)/) {
 | 
			
		||||
        $name = $1;
 | 
			
		||||
    } elsif ($data[1] =~ /^\s*([^s]*)\s*$/) {
 | 
			
		||||
        $name = $1;
 | 
			
		||||
        $name =~ s/ /_/;
 | 
			
		||||
        $name =~ tr/A-Z/a-z/;
 | 
			
		||||
    }
 | 
			
		||||
    if (exists($opt{u})) {
 | 
			
		||||
      ## TRACE_LINE print "Rscan: orig_name [$name]\n";
 | 
			
		||||
      
 | 
			
		||||
@@ -1825,7 +1831,17 @@ sub rscan_stanza {
 | 
			
		||||
    if ($data[1] =~ /Comm Error/) {
 | 
			
		||||
      next;
 | 
			
		||||
    }
 | 
			
		||||
    $result .= "$data[1]:\n\tobjtype=node\n";
 | 
			
		||||
    my $objname;
 | 
			
		||||
    if ($data[1] =~ /\(\s*([^\s]*)\s*\)/) {
 | 
			
		||||
        $objname = $1;
 | 
			
		||||
    } elsif ($data[1] =~ /^\s*([^s]*)\s*$/) {
 | 
			
		||||
        $objname = $1;
 | 
			
		||||
        $objname =~ s/ /_/;
 | 
			
		||||
        $objname =~ tr/A-Z/a-z/;
 | 
			
		||||
    } else {
 | 
			
		||||
        $objname = $data[1];
 | 
			
		||||
    }
 | 
			
		||||
    $result .= "$objname:\n\tobjtype=node\n";
 | 
			
		||||
 | 
			
		||||
    foreach ( @rscan_attribs ) {
 | 
			
		||||
        my $d = $data[$i++];
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user