Ignore:
Timestamp:
04/17/13 18:24:02 (11 years ago)
Author:
nanardon
Message:

add ssh finger print for each name

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Buildnet.pm

    r1226 r1227  
    483483                } 
    484484            } 
    485             foreach (grep { $_ } $host_o->get_attributes('sshfp')) { 
    486                 $dbzone .= sprintf( 
    487                     "%-30s IN    SSHFP    %s\n", 
    488                     $res, 
    489                     $_, 
    490                 ); 
     485            # SSH finger print 
     486            foreach my $name (grep { $_ } ($res, $host_o->get_attributes('otherName'))) { 
     487                foreach my $sshfp (grep { $_ } $host_o->get_attributes('sshfp')) { 
     488                    $dbzone .= sprintf( 
     489                        "%-30s IN    SSHFP    %s\n", 
     490                        $name, 
     491                        $sshfp, 
     492                    ); 
     493                } 
    491494            } 
    492495        } 
Note: See TracChangeset for help on using the changeset viewer.