Alter the storage of messages so that illegal characters are stored as '.'

in an attempt to stop such messages from hanging.
This commit is contained in:
minima 2001-12-02 22:56:26 +00:00
parent 57422253a7
commit ea3457ff6e
2 changed files with 4 additions and 1 deletions

View File

@ -7,6 +7,8 @@ poluting the nodes table. Maybe this will make things slightly more stable.
to take the strain.
4. Move the dupe checking AFTER the input filtering for announces and spots.
5. Changed the checking of PC19/21 that it doesn't alter the wrong node
6. Alter the storage of messages so that illegal characters are stored as '.'
in an attempt to stop such messages from hanging.
26Nov01=======================================================================
1. Make changes to the installation manual to show making the client before
actually trying to use it! Thanks to oz1lqh. Also add a line for SuSE

View File

@ -518,6 +518,7 @@ sub store
my $line;
$ref->{size} = 0;
foreach $line (@{$lines}) {
$line =~ s/[\x00-\x08\x0a-\x1f\xf0-\xff]/./g;
$ref->{size} += (length $line) + 1;
print $fh "$line\n";
}
@ -530,7 +531,7 @@ sub store
}
# actual remove all the 'deleted' messages in one hit.
# this has to me delayed until here otherwise it only does one at
# this has to be delayed until here otherwise it only does one at
# a time because @msg is rewritten everytime del_msg is called.
my @del = grep {!$_->{tonode} && $_->{delete} && $_->{deletetime} < $main::systime} @msg;
for (@del) {