mirror of
git://scm.dxcluster.org/scm/spider
synced 2024-09-21 07:47:10 +00:00
c1540ccd79
This is what Changes says: Change the route finding algorithm completely. No more recursion. No more tree searching. It now gives you answers even on a partial cluster map. Oh and the answers are correct, instead on completely random. Also completely remove RouteDB from the equation. Also change sh/newc to default to node map rather than node+user map.
22 lines
409 B
Perl
22 lines
409 B
Perl
#
|
|
# show the new style cluster routing tables to the user
|
|
#
|
|
# Copyright (c) 2001 Dirk Koopman G1TLH
|
|
#
|
|
#
|
|
#
|
|
|
|
my ($self, $line) = @_;
|
|
my @list = map { uc } split /\s+/, $line; # list of callsigns of nodes
|
|
my @out;
|
|
my $nodes_only = 1;
|
|
|
|
if (@list && $list[0] =~ /^USE/) {
|
|
$nodes_only = 0;
|
|
shift @list;
|
|
}
|
|
|
|
push @out, $main::routeroot->config($nodes_only, $self->width, 0, {}, @list);
|
|
return (1, @out);
|
|
|