projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
6897e4a
)
route external DB Commands and drop any directed locally
author
djk
<djk>
Mon, 31 May 1999 17:04:20 +0000
(17:04 +0000)
committer
djk
<djk>
Mon, 31 May 1999 17:04:20 +0000
(17:04 +0000)
Changes
patch
|
blob
|
history
perl/DXProt.pm
patch
|
blob
|
history
diff --git
a/Changes
b/Changes
index e2235683af9d24f0daf4d0536d8654b5a216314c..92fa5efe9708847a795f62363d75321deb601044 100644
(file)
--- a/
Changes
+++ b/
Changes
@@
-5,6
+5,7
@@
the channels that they are supposed to.
connecting node's privilege level).
3. Pass thru merge requests for other nodes.
4. Removed a warning from client.pl
connecting node's privilege level).
3. Pass thru merge requests for other nodes.
4. Removed a warning from client.pl
+5. routed external DB commands and drop them (for now) locally
25May99=======================================================================
1. try to make the lastin value correct even for local users
2. got rid of the stupid bug that failed to print out the offline message
25May99=======================================================================
1. try to make the lastin value correct even for local users
2. got rid of the stupid bug that failed to print out the offline message
diff --git
a/perl/DXProt.pm
b/perl/DXProt.pm
index 19859af08d4789b95022e4962500506f8148ecb6..1ca20badcdddd0f47a7bc0485dd75579a529357b 100644
(file)
--- a/
perl/DXProt.pm
+++ b/
perl/DXProt.pm
@@
-559,10
+559,8
@@
sub normal
return;
}
return;
}
- if ($pcno == 37) {
- last SWITCH;
- }
-
+ # for pc 37 see 44 onwards
+
if ($pcno == 38) { # node connected list from neighbour
return;
}
if ($pcno == 38) { # node connected list from neighbour
return;
}
@@
-599,25
+597,21
@@
sub normal
if ($pcno == 43) {
last SWITCH;
}
if ($pcno == 43) {
last SWITCH;
}
- if ($pcno == 44) {
- last SWITCH;
- }
- if ($pcno == 45) {
- last SWITCH;
- }
- if ($pcno == 46) {
- last SWITCH;
- }
- if ($pcno == 47) {
- last SWITCH;
- }
- if ($pcno == 48) {
- last SWITCH;
+ if ($pcno == 37 || $pcno == 44 || $pcno == 45 || $pcno == 46 || $pcno == 47 || $pcno == 49) {
+ if ($field[1] eq $main::mycall) {
+ ;
+ } else {
+ route($field[1], $line);
+ }
+ return;
}
if ($pcno == 50) { # keep alive/user list
}
if ($pcno == 50) { # keep alive/user list
- my $ref = DXCluster->get_exact($field[1]);
- $ref->update_users($field[2]) if $ref;
+ my $node = DXCluster->get_exact($field[1]);
+ if ($node) {
+ return unless $node->dxchan == $self;
+ $node->update_users($field[2]);
+ }
last SWITCH;
}
last SWITCH;
}