mirror of
				https://github.com/xcat2/xcat-core.git
				synced 2025-11-04 05:12:30 +00:00 
			
		
		
		
	Do not attempt to even dump non-standard multirecord fields, they may not comply with spec
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@11091 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
		@@ -2310,12 +2310,15 @@ sub parsefru {
 | 
			
		||||
        my $last=0;
 | 
			
		||||
        $curridx=$bytes->[5]*8;
 | 
			
		||||
        my $currsize;
 | 
			
		||||
        while (not $last) {
 | 
			
		||||
            if ($bytes->[$curridx+1] & 128) {
 | 
			
		||||
                $last=1;
 | 
			
		||||
            }
 | 
			
		||||
            $currsize=$bytes->[$curridx+2];
 | 
			
		||||
            push @{$fruhash->{extra}},$bytes->[$curridx..$curridx+4+$currsize-1];
 | 
			
		||||
	if ($bytes->[$curridx] <= 5) { #don't even try to parse unknown stuff
 | 
			
		||||
			#some records don't comply to any SPEC
 | 
			
		||||
	        while (not $last) {
 | 
			
		||||
	            if ($bytes->[$curridx+1] & 128) {
 | 
			
		||||
	                $last=1;
 | 
			
		||||
	            }
 | 
			
		||||
	            $currsize=$bytes->[$curridx+2];
 | 
			
		||||
	            push @{$fruhash->{extra}},$bytes->[$curridx..$curridx+4+$currsize-1];
 | 
			
		||||
        	}
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
    return 0,$fruhash;
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user