Hi folks !
I had to remove this file from my system and recreate the Masq file from
templates because this
"40AllowPOP" file was bloking access to any external POP server.
Any idea why this script was in my system ?!
Thanx
-------------------------------------
[root@server /]# cat 40AllowPOP
{
package esmith;
use strict;
use Errno;
use esmith::config;
use esmith::util;
use esmith::db;
$OUT = '';
my %conf;
tie %conf, 'esmith::config';
my %networks;
tie %networks, 'esmith::config', '/home/e-smith/networks';
my $racine="FetchMails";
my $fetch=db_get(\%conf,$racine,'custom_service');
if(( not defined $fetch) || ($fetch eq ''))
{
db_set(\%conf,$racine,'custom_service');
db_set_prop(\%conf,$racine,'Routing','YES');
}
my $lock=db_get_prop(\%conf,$racine,'Routing');
if ( $lock eq 'NO' )
{
my $locIp=db_get(\%conf,'LocalIP');
my $locMask=db_get(\%conf,'LocalNetmask');
my ($network, $broadcast) = esmith::util::computeNetworkAndBroadcast
($locIp, $locMask);
$OUT .= " # POP-AUTH : Forwarding of pop (port 110) is denied to
enforced mail-authentication\n";
$OUT .= " /sbin/ipchains --append forward -p tcp --source
".$network."/".$locMask." --destination 0.0.0.0/0 pop -j denylog\n";
$OUT .= " # End of POP-AUTH\n";
my $key;
my $value;
while (($key,$value) = each %networks)
{
my ($type, %properties) = split (/\|/, $value, -1);
if ($type eq 'network')
{
$OUT .= " # POP-AUTH : Forwarding of pop (port 110) is
denied to enforced mail-authentication\n";
$OUT .= " /sbin/ipchains --append forward -p tcp --source
".$key."/".$properties{'Mask'}." --destination 0.0.0.0/0 pop -j denylog\n";
$OUT .= " # End of POP-AUTH\n";
}
}
}
$OUT;
}
----
Windows? Why? Linux gives me as much instability as I need. None!
Penguin power
--
Please report bugs to [EMAIL PROTECTED]
Please mail [EMAIL PROTECTED] (only) to discuss security issues
Support for registered customers and partners to [EMAIL PROTECTED]
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Archives by mail and http://www.mail-archive.com/devinfo%40lists.e-smith.org
