projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
380d6e8
)
stop the routing of messages back down the same interface
author
minima
<minima>
Sat, 23 Dec 2000 11:54:49 +0000
(11:54 +0000)
committer
minima
<minima>
Sat, 23 Dec 2000 11:54:49 +0000
(11:54 +0000)
Changes
patch
|
blob
|
history
perl/DXProt.pm
patch
|
blob
|
history
diff --git
a/Changes
b/Changes
index ce65beb7a1caca9c25339bc49644941bfb23f02d..8e847cb5d6943cf6468a1d1670f104867b3d2fad 100644
(file)
--- a/
Changes
+++ b/
Changes
@@
-1,3
+1,5
@@
+23Dec00=======================================================================
+1. don't route anything back down the channel it came from.
18Dec00=======================================================================
1. fix double printing of DB results
2. add new style filtering for WWV and WCY to complete the set
18Dec00=======================================================================
1. fix double printing of DB results
2. add new style filtering for WWV and WCY to complete the set
diff --git
a/perl/DXProt.pm
b/perl/DXProt.pm
index c7cd41b77cec153ca0b6a83c5aefddafab9dee2b..04f2aff75d7efcc0b3bab3990e7ccc3374e0c2e4 100644
(file)
--- a/
perl/DXProt.pm
+++ b/
perl/DXProt.pm
@@
-1475,12
+1475,18
@@
sub route
unless ($dxchan) {
my $cl = DXCluster->get_exact($call);
$dxchan = $cl->dxchan if $cl;
unless ($dxchan) {
my $cl = DXCluster->get_exact($call);
$dxchan = $cl->dxchan if $cl;
+ if ($dxchan eq $self) {
+ dbg('chan', "PCPROT: Trying to route back to source, dropped");
+ return;
+ }
}
if ($dxchan) {
my $routeit = adjust_hops($dxchan, $line); # adjust its hop count by node name
if ($routeit) {
$dxchan->send($routeit);
}
}
if ($dxchan) {
my $routeit = adjust_hops($dxchan, $line); # adjust its hop count by node name
if ($routeit) {
$dxchan->send($routeit);
}
+ } else {
+ dbg('chan', "PCPROT: No route available, dropped");
}
}
}
}