better tooltip for netmap

This commit is contained in:
Oliver Gorwits
2018-01-01 01:07:56 +00:00
parent 21eb5a4a97
commit 57d308196b

View File

@@ -74,13 +74,14 @@ sub to_speed {
sub make_node_infostring { sub make_node_infostring {
my $node = shift or return ''; my $node = shift or return '';
my $fmt = ('Serial: <b>%s</b><br>Vendor/Model: <b>%s / %s</b><br>' my $fmt = ('<b>%s</b> is %s <b>%s %s</b><br>running <b>%s %s</b><br>Serial: <b>%s</b><br>'
.'OS/Version: <b>%s / %s</b><br>Uptime: <b>%s</b><br>' .'Uptime: <b>%s</b><br>Location: <b>%s</b><br>Contact: <b>%s</b>');
.'Location: <b>%s</b><br>Contact: <b>%s</b>'); return sprintf $fmt, $node->ip,
return sprintf $fmt, ((($node->vendor || '') =~ m/^[aeiou]/i) ? 'an' : 'a'),
ucfirst($node->vendor || ''),
map {defined $_ ? $_ : ''} map {defined $_ ? $_ : ''}
map {$node->$_} map {$node->$_}
(qw/serial vendor model os os_ver uptime_age location contact/); (qw/model os os_ver serial uptime_age location contact/);
} }
sub make_link_infostring { sub make_link_infostring {