- my $ping = $dxchan->is_node && $dxchan != $main::me ? sprintf("%8.2f",
- $dxchan->pingave) : "";
+ my $obscount = $dxchan->nopings;
+ my $pingint = $dxchan->pingint;
+ my $lastt = $dxchan->lastping ? ($dxchan->pingint - ($nowt - $dxchan->lastping)) : $pingint;
+ my $ping = sprintf("%7.2f", $dxchan->pingave || 0);
+ my $iso = $dxchan->isolate ? 'Y' : ' ';
+ my $uptime = difft($dxchan->startt, 1);
+ my ($fin, $fout, $pc92) = (' ', ' ', ' ');
+ if ($dxchan->do_pc9x) {
+ $pc92 = 'Y';
+ } else {
+ my $f;
+ if ($f = $dxchan->inroutefilter) {
+ $fin = $dxchan->inroutefilter =~ /node_default/ ? 'D' : 'Y';
+ }
+ if ($f = $dxchan->routefilter) {
+ $fout = $dxchan->routefilter =~ /node_default/ ? 'D' : 'Y';
+ }
+ }
+ unless ($pingint && $ping) {
+ $lastt = 0;
+ $ping = ' ';
+ $obscount = ' ';
+ }
+