Changeset 115


Ignore:
Timestamp:
Oct 3, 2012, 2:08:53 PM (12 years ago)
Author:
g7moreau
Message:
  • Begin Trunk port (maybe better !)
  • Delete a warning
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/klask

    r114 r115  
    499499      }
    500500
     501   if ($sw_model eq 'HP2810-48G') {
     502      if ($sw_port > 48) {
     503         
     504         my $reste = $sw_port - 48;
     505         return "T$reste";
     506         }
     507      }
     508
    501509   return $sw_port;
    502510   }
     
    529537
    530538         return 16 + $reste;
     539         }
     540      }
     541
     542   if ($sw_model eq 'HP2810-48G') {
     543      if ($sw_port =~ m/^T/xms ) {
     544
     545         my $reste =  substr $sw_port, 1;
     546
     547         return 48 + $reste;
    531548         }
    532549      }
     
    12021219      my $ip_hostname_fq = $computerdb->{$ip}{hostname_fq};
    12031220
    1204       my $swpt = sprintf "%-28s  %2s", $computerdb->{$ip}{switch_hostname}, $computerdb->{$ip}{switch_port};
     1221      my $swpt = sprintf "%-28s  %2s",
     1222         $computerdb->{$ip}{switch_hostname} || $computerdb->{$ip}{switch_description},
     1223         $computerdb->{$ip}{switch_port};
    12051224      $swithportdb{$swpt} ||= {
    12061225         ip          => $ip,
Note: See TracChangeset for help on using the changeset viewer.